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O importante, numa loja de informatics 
6 o numero de opgoes que ela oferece. 

£ a equipe tecnica de que dispde, 
para uma orienta<&o segura 
na escolha do equipamento e do programa 
mais adequados ao seu caso 
pessoaL, ou ao de sua Empresa. 

For isso a Computerised 
& importante para 
sua decisZo. 



Consulte o nosso cardapio: 





Computerlcind 



S3o Paulo 

Ao. Angelica , 1996 - Tels. (01 1) 258-3954 
258 1573 e 256-3307 ■ Telex (01 1) 36271 

Aberta ate zks 22 horas. 
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Q£J MICROPROCESS ADORES 
ZO DE 16 BITS - Ja famosos no 
mercado intemacional, os micros 
de 16 bits comegam a aparecer no 
Brasil. Conhega, com Antdnio 
Rafael D. Teixeira, as principals 
families americanas. 



OO NO MUNDO DAS 
Oo IMPRESSORAS - Como 
escolher sua impressora? Uma 
reportagem sobre o mercado, 
incluindo uma tabela com todos 
os modelos - e suas caracteristicas 
• fabricados no Brasil. 
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A n CONTROLE DE ESTOQUE 
*0 NO PC-1500 - Um programa 
que ncio deixarA seu estoque 
entrar em baixa, desenvolvido por 
Newton Braga Jr. 



irn TORRE DE HANOI: 

/ 4 UMA SOLUQAO EM BASIC 

- O princxpio da solug&o recursiva 
aplicada h linguagem BASIC, 
neste programa-jogo de Joao 
Henrique A. Franco. 
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• Neste numero de MICRO SISTE- 
MAS, apresentamos uma reportagem 
completa sobre o mercado de impres- 
soras, fornecendo preqos e caracte- 
rlsticas dos modelos disponiveis para 
utilizaqao em micros pessoais. 

Nossa experidncia mostra que, para 
a maior parte de usudrios domdsti- 
cos, o perifdrico impressor 6 nada 
menos que um fascinante e inacessi- 
vel sonho. Varies vezes, diante da per- 
gunta se teriam disponibilidade de 
impressora, di versos lei to res com 
quern temos contato tazem cara de 
susto: " Mas eu sd uso em casa..." 

Por certo esta exclamaqao 6 com- 
preenslvel, e at6 em alguns casos lou- 
vdvel, posto que afasta o perigo de 
exageros nao cabiveis no contexto 
atual do Brasil. Algo do tipo "tirar lis- 
tagens dos gastos mensais" ou “usar 
a impressora para printar o resultado 
do jogo da velha". (£ o caso de um 
senhor que procurava saber aonde 
comprar joguinhos para seu sistema 
— de 64 K e disco de 8" — de utiliza- 
qao domdstica). 

• O que ocorre 6 que o prepo das im- 
pressoras em nosso pals 6 muito alto. 
Aqui certamente posso ouvir aqueles 
que alegam j6 ter o prepo do periferi- 
co evoluldo (ou involuido) bastante, a 



ponto de diminuir o diferencial com 
relaqao aos preqos dos equipamen- 
tos estrangeiros. Notem poribm que 
quando falo de preqos, trato-o de for- 
ma relative, sem “ expurgos levan- 
do em conta a mddia do poder aqui- 
sitivo dos usudrios de computadores 
domdsticos de abaixo — e acima — 
do Equador. 

Este prepo elevado prende-se bas- 
tante ao problema da escala de pro- 
duqao, pois embora nossa Industrie 
j& possua razo&veis indices de nacio- 
nalizaqao, as vezes sao pouco com- 
pensadores, face ao volume de pro- 
duq&o, os altos investimentos neces- 
Scirios, principalmente no setor da me- 
cinica tin a. 

A nacionalizaqao, em certas fases, 
esbarra na escala. A nao nacionaliza- 
qao sofre influSncias dos impactos 
cambiais e creditlcios de nossa poli- 
tics. E as impressoras continuam ca- 
ras se enfocadas fora do imbito das 
aplicaqdes " comerciais ”, 

• Uma boa oportunidade para a in- 
dustria abre-se neste momento em 
que os condutores da Polltica de In- 
formdtica procuram incentivar a ex- 
portaq&o. Muitos pronunciamentos e 
tentativas de aproximaqao comercial 
com outros paises tdm sido levadas a 



efeito no sentido de salvaguardar nos- 
sa industria, fortalecendo-a para que 
melhor suporte os ataques constan- 
tes que t&m sido desfechados contra 
a reserva de mercado. 

£ importante perceber que esta ten- 
tativa de proteqao da industria nacio- 
nal finalmente abriu a discussao da 
informitica para segmentos mais am- 
plos da populaqAo, chegando ao Se- 
nado Federal atravds de um Simpdsio 
realizado recentemente. E 16, o que 
se tern visto, afora alguns exercicios 
de retdrica certamente sedutores, 6 
um consenso dos parlamentares em 
torno da situapao defend ida pela SEI. 
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O sorteado deste mes, que receberd 
gratuitamente uma assinatura de um 
ano de MICRO SISTEMAS, A Marco 
Antonio R. Tenbrio, de Alagoas. 



APRENDA INGLES 

Cada vez mais interessante a MI- 
CRO SISTEMAS. Muito bom o pro- 
grama "Aprenda Ingles no computa- 
dor", do Renato Degiovani, publicado 
no numero 18. 0 mesmo pode ser 
adaptado para outras matArias, o que o 
torna muito util na Area de ensino, e 
isto usando um micro de baixo custo. 

O sistema de avaliagSo dos resulta- 
dos prevA, no entanto, apenas grupos 
de 15 perguntas. Tomo a liberdade de 
sugerir algumas modificagbes para que 
possa ser feita a avaliagSo dos resulta- 
dos com qualquer numero de pergun- 
tas : 

6050 IF Z < INT (S * .33 + .5 ) 

THEN GOTO 6200 

6055 If Z < INT (S * .66 + .5 ) 

THEN GOTO 6300 

6060 IF 2 < S THEN GOTO 6400 

6065 IF Z “ 8 THEN GOTO 6500 

Luiz Carlos Nardy 
Jail — SP 

Muito bem, Luiz Carlos, gostamos 
de ver sua disposigSo em procurar mo 
dificar o programa, e ainda mais em 
dividir sua experiAncia com os outros 
le (tores. 



ESCARAPATES? 

£ com satisfag3o que comunico- 
vos a apresentag3o, hoje, pela primeira 
vez, nos oscarapates dos quiosques des- 
ta cidade, da revista MICRO SISTE- 
MAS de vossa edig3o. 

Desde jd as minhas felicitagbes e 
votos para que o vosso esforgo conti- 
nue no sentido de um aperfeigoamento 
constante na divulgagSo/formagSo na 
Area da Informdtica. Devido principal- 
mente a grande demora e irregularida- 
de no aparecimento da maioria das re- 
vistas brasileiras aqui, na llha da Ma- 
deira (e no restante de Portugal, penso 
eu), convAm-me receber a revista MI- 
CRO SISTEMAS diretamente, por assi- 
natura. 

Manuel da Silva F. de Abreu 
Funchal — Madeira 



Agradecemos muito o incentivo e 
os elogios. Mas, uma coisa nos intri- 
gou: o que serd escarapates dos quios- 
ques? 



CURIOSIDADES DA Tl 



Ao ler o artigo "Curiosidades das 
TIs 58/59" publicado nas revistas MI- 
CRO SISTEMAS n9s 5 e 6, fiquei mui- 
to entusiasmado ao saber de macetes 
que n3o constam no manual destas md- 
quinas. Desta maneira, descobri novas 
bandeiras (flags) para serem usadas pe 
los usudrios. Estas novas bandeiras 
(89), que n3o podem ter acesso direto 
pelo teclado, s6 podem ser usadas em 
programas. O procedimento para se 
usar estas bandeiras d o seguinte: 

• Colocagdo - ST F STO XX BST BST 
2nd Del 

• Retirada - INV STF STO XX BST 
BST 2nd Del 

• Teste de posicionamento — IFF 
STO XX BST BST 2nd Del 

• Teste de nSo posicionamento — 
INV IFF STO XX BST BST 2nd Del 
XX entre 10 e 99, XX 4 40. 

De uma maneira mais prdtica, seria: 

• ColocagSo - STF TT 

• Retirada -INV STF TT 

• Teste de posicionamento — IFF TT 

• Teste de n3o posicionamento — 
INV IFF TT 

Onde TT 6 a tecla que tern como 
cbdigo o numero da bandeira que se 
quer usar. Para ilustrar melhor, obser- 
vem o exemplo. 

I aamploi 

HANOI IRA UCIAS CROC I 0 I Ml N I O 

10 2nd C 1 STF 2nd I' • IFF 2nd C 

62 2nd l‘qm 2nd Ind STF 2nd Pgm 2nd Ind 

9» 2nd Prt STF 2nd Prt 

M i Ind. 

Marco Antonio R. Tenbrio 
Maceib - Alagoas 

Muito bom, Marcos. T8o bom que 
publicamos. E tern mais: esperamos 
que em breve vocA nos mande progra- 
mas e novas descobertas para a Tl. 



TRIBUNA 



HA alguns meses vi publicado nessa 
revista um anuncio de um clube cha- 
mado "Clube de UsuArios do TRS-80", 
que me interessou como proprietArio 
que sou de um DGT-100. Escrevi ao 
enderego mencionado e prontamente 
recebi um formulArio de inscrigSo, 
acompanhado de carta explicativa. A 
proposta me interessou pela perspecti- 
va de intercSmbio tAcnico e paguei 1 
ORTN pela inscrigSo. 

Desde ent3o recebi apenas trAs ml- 
seros boletins informativos, cujo escas- 
so conteudo tratava praticamente s6 



de ofertas de vendas de equipamentos, 
servigos e programas. HA tempos es- 
crevi ao Sr. Theodorico Pinheiro, res- 
ponsdvel pela entidade, pedindo um es- 
tatuto ou regulamento da associagSo, 
assim como dando algumas sugest5es 
no sentido que a minha pobre ORTN 
trouxesse um retorno um pouco maior. 
Recebi uma "amdvel" resposta prome- 
tendo atender, mas atA hoje nada. 

Pego-lhes a gentileza de publicarem 
esta carta. 

JosA Ribeiro Pena Neto 
Belo Horizonte - MG 

Havfamos tornado conhecimento da 
carta do Sr. JosA Ribeiro Pena e jd ha- 
vfamos respond ido, atendendo a solici- 
tagao do mesmo de desligamento do 
Clube. O mesmo ingressou no Clube 
em meados de agosto de 82. 

Os nossos boletins informativos sAo 
bimensais, contendo listagem comple- 
tas de programas. Enviamos uma revis- 
ta TRS-80 americana, informagSes ge- 
rais de outros associados que tern pro- 
gramas para oferecer, indicagoes de 
quern faz manutengSo de micros TRS- 
80, e prestamos pequenas gentilezas 
dos associados de outros Estados quan- 
do nos solicitam daqui de Sao Paulo, 
como j8 aconteceu com morador de 
Goi&s e do Rio Grande do Sul. 

O Sr. Ribeiro, alAm disso, quer que 
n6s tambAm oferegamos gratuitamente 
programas gravados em fita cassete ou 
disco, ao modelo da CLOAD ameri- 
cana, tudo ao custo de uma ORTN 
anual. Jd havfamos escrito anterior- 
monte ao mesmo dizendo que esta 
ultima solicitagSo n3o poderia ser aten- 
dida. 

Theodorico Pinheiro 
S3o Paulo — SP 



MS AGRADECE 



Depois de tantas cartas (acho que 
j3 escrevi umas seis) e tantos pedidos, 
e vocAs sempre fazendo o m3ximo para 
me responder, acho que j3 A hora de 
agradecer a toda a equipe de MICRO 
SISTEMAS que me ajudou a sair do 
analfabetismo em Informdtica. Obri- 
gado e atA a prbxima! 

Antonio C. Fontes 
S3o Paulo — SP 

Agradego a publicag8o do meu 
anuncio na Seg3o Clubes, atravAs da 
qual jd recebi telefonemas e cartas 
para fundar um clube de computagSo. 

Admiro muito o trabalho de voces 
e, como comprei vdrias revistas no gS- 
nero, pude concluir que a publicagao 
de vocAs estA bem 3 frente das ou- 
tras (...) 
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Continuem colocando jogos am BA- 
SIC njvel II na revista, pois aprecia- 
mos muito (eu e alguns colegas). 
Alfredo A. T. Gallinucci 
Santo Andrd — SP 

Sendo mais um dos que adotou a 
inform9tica como "hobby”, fiquei 
muito satisfeito ao descobrir a revista 
MICRO SISTEMAS, que desde os pri- 
meiros numeros se primou pela quali- 
dade, que melhora a cada numero. 

Sou estudante de Engenharia Meta- 
lurgica, e h4 mais de cinco anos traba- 
Iho com calculadoras programdveis. 
Desde entSo venho desenvolvendo 
meus prdprios programas, muito deles 
especfficos para Metalurgia e Matemd- 
tica. Mais recentemente tive contatos 
com os computadores de grande porte, 
e ap6s trabalhar em seus terminals fui 
atacado pelo "Bacilus Terminales Es- 
pecimdn" (MICRO SISTEMAS n9 17), 
e jd estou partindo para a compra de 
um micro. 

Getulio de A. Ramos Jr. 

Belo Horizonte-MG 

Quero agradecer pela ajuda quanto 
ds informagSes dadas sobre o computa- 
dor Sharp HC-1500. 

A atengSo de V. Sas. foi de impor- 
tance para demonstrar a responsabili- 
dade e preocupagSo com que voces tra- 
tam os leitores. Parabenizo a qualidade 
desta publicagSo e, mais uma vez, agra- 
de?o profundamente. 

Nilton Lobo P. Guedes 
S3o Paulo - SP 

Venho por meio desta agradecer a 
gentileza por terem publicado em vos- 
sa revista, na Sep3o Classificados, um 
pequeno anuncio sobre troca ou venda 
de programas para micros com tecno- 
logia Sinclair. Recebi vdrias cartas de 
todo Brasil, e uma carta do exterior 
(Paraguai). Isto me chamou a atenpSo 
para a excelente penetragao alcanpada 
pela revista, aliis, a melhor que existe 
no mercado. 

Renato Strauss 
S3o Paulo — SP 



SUGESTOES 

Recientemente pude leer el n9 16 
de la revista y estoy notando que estan 
mejorando cada vez mucho mas. 

Ya se aen los anuncios y en los ar- 
ticulos y espero que siempre, con el 
correr del tiempo, vayan mejorando 
mucho mas. Felicidades por el trabajo 
del equipo de MS les desea um amigo 
lector del Paraguay. 

Asi a su vez sujeriria si podrian ha- 
cer comparaciones entre micros nacio- 



nales y los importados, como el TK82- 
C, el TK85 con respecto al Sinclair 
ZX81 y asi sucesivamente, esto les su- 
jiero para que los lectors tengan al- 
gunas ideas de lo que le puede ogrecer 
uno u otro micro. 

Carlos Fassardi 
Asuncion-Paraguay 

Todos os nCtmeros de MICRO SIS- 
TEMAS trazem uma sdrie de cartas 
cheias de elogios d revista. Eu gostaria 
de reunir todas essas cartas e assinar 
em baixo. No entnato, a minha moti- 
vapio para escrever 6 no sentido de 
apresentar uma crftica. 

Vivemos o perfodo infernal de dois 
sistemas de discos quadrafdnicos. Veio 
depois a tragddia de dois formatos de 
videocassetes. Agora sofremos coisa 
pior com os microcomputadores: a di- 
ferenpa entre asdiversas UCPs faz com 
que o BASIC de um n9o sirva nos ou- 
tros (...). 

Esta introdupSo encaminha dois pe- 
didos: 

19 - Um detalhado artigo com o tf- 
tulo "Diciondrio para as tradup&es dos 
dialetos BASIC/BASIC. Este artigo te- 
ria nas colunas os UCPs (Z80, 8085, 
6502 etc.), e nas linhas os comandos a 
modificar ou substituir. 

29 — Cada vez que MICRO SISTE- 
MAS publicar um artigo como aquele 
Mala Direta, a revista dard uma ajuda 
na tradupSo para os outros micros. 
Affonso do Prado Seabra 
Rio de Janeiro-RJ 

... £ minha opiniSo que MS n3o de- 
ve imprimir programas (ou aula te6- 
rica) usando matrizes de 7x5 pontos 
para os caracteres das listagens. Eles 
(os caracteres) ficam horrfveis, alguns 
apagados, inintelegfveis e cansam as re- 
tinas (...). Meu conselho 6 que MS pu- 
blique os programas com caracteres ti- 
pogrAficos normais, como no n9 7, p4- 
gina 35. Ficou excelente! (...) 

Nova sugestdo: MS deveria publicar 
a "Mensagem de Erro" em uma pdgina 
avulsa, com o verso em branco, a fim 
de poder ser destacada, recortada e co- 
lada sobre o local onde estd o erro. 

Gostaria de ver em MICRO SIS- 
TEMAS um artigo que explique como 
utilizar os programas escritos na lin- 
guagem BASIC na calculadora alfanu- 
mdrica HP-41CV. Que tal consultar os 
engenheiros, programadores e colabo- 
radores de MS sobre o assunto? 

Nelson R. de Freitas 
Sorocaba - SP 



Envie suas sugeitoes para MICRO 
SISTEMAS. Elat aerSo anotadas em 
nossa pauta e procuraremos, na medi- 
da do possfvel, viabilizd-las. 



OS 

MICROS 
ESTAO Al! 
APRENDA A 
PROGRAMA-LOS 



Se vote deseia aprender a programar mi- 
trot omptiladores, esla e a sua thantel 
Sim, porque a SIJI I IVAN Mitrotomotila- 
doret, evpet iali/ada em t ursois promsio- 
nali/anles desde 197J, lem o que ha de 
melhor e mais atualizado para fazer de 
vote, em pouto tempo, um profissional 
lolalmenle tapatilado a operar mitro- 

t omputadores. 

Veja nossos tursos, por freqiientia on 
t orrespondent ia : 



— Basito de Elelronit a Digital 

— Ilasito para Mit rot omputadores 

— Mitro-prot essador BOBO e auxilia- 
res 

— Mit ro-protessadores 7.-80 

— Integrado, eoglobando 3 dos tor- 
sos atima 

— linguagem BASIC espetilito para 
Mit rot omputadores 



Nao hi misterio. t estolher e aprender. 
SUIIIVAN 

MIC KOCOMPU I ADORES LIDA. 
R. Siqtieira Campos, 43 - Gr. 703 
CLP 2703 1 - Rio - RJ. 

Plantao teleionito 24 hs. 

Tel.: (021) 295-0169 





/ \ 

CALCULADORAS 
i -HP- 



Compre aquele modelo novo 
que voc6 deseja, mas traga 
sua calculadora HP usada 
para uma avalia<;ao, pois 
ela entra como parte de 
pagamento da nova. 



Venha pessoalmente, ou 
telefone e fale c/o Johnny 



J. Heger & Cia 
Revendedor Aut. H.P. 



Av. Moaci, 155 - Moema 
532-1836 SP. (011) 

J 
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Enxadrista experiente, Luciano Nito da An- 
drade jd escreveu para os jornais "Correio da 
ManhS". "Data News" a "Oltima Hora" e pa- 
ra a revista "Fatos & Fotos". Luciano & econo- 
mists, trabalhando no Ministirio da Fazenda, 
no Rio de Janeiro. As o pin ides e comen tdrios 
de Luciano Nito de Andrade, bem como as 
ultimas novidades do Xadrez jogado por com- 
putadores, estarao sempre presen tes em 
MICRO SISTEMAS. 



TK 82 -C vs. Atari 



anifesto interesse levou-nos a 
realizar um confronto enxa- 
drfstico entre os programas Vi- 
deo Chess, da Atari e o TKADREZ, do 
micro TK82-C, ambos conhecidos de 
nossos leitores. 

0 videogame Atari, em virtude de 
seus variados programas ludicos, tem-se 
tornado a coqueluche da juventude em 
todo o mundo, enquanto o TK82-C 
apresenta propositos mais pr^ticos, tra- 
tando-se de um microcomputador de 
uso geral, por^m com muitos programas 
de jogos. 

No que diz respeito ao jogo de Xa- 
drez, nos diversos confrontos havidos 
entre os dois programas e contra joga- 
dores, o TKADREZ apresentou melhor 
performance. Contudo, nao obstante 
sua m'tida superioridade nas fases de 
abertura e meio-jogo, ele foi incapaz de 
impor-se na fase final, nao indo alem do 
empate, mesmo com imensa vantagem 
material merecidamente conquistada, 
como o leitor poderd constatar pelas 
duas partidas que apresentamos a seguir. 



Video Chess Atari (m'vel 3) 
x 

TKADREZ {m'vel 2) 



1 - P4R P4R; 2 - C3BR C3BD; 3 - 
C3B C3B; 4 - P4D PxP; 5 - CxP B4B; 
6 - B3R CxC; 7 - BxC D2R; 8 - D3D 



0-0; 9 — T1D D3D. Jogada pueril para 
ganhar o bispo. 10 — C5D BxB; 11 — DxB 
CxC; 12 - DxC D5C+; 13 - P3BD 
DxPC e as pretas capturam um peao 
branco. O excesso de otimismo das 
brancas ao jogar 10 — C5D em vez de 
BxB , seguido de 0-0, custou-lhes o pe§o. 
14 - D4B D3C; 15 - B3D P3D; 16-0-0 
B3R; 17 - D4C D4B; 18 - D2C. Se 
DxPC(?), 19 — DxPB+, seguido de 20 — 
R2R TD1C; 21 - D3T T7C+ e o rei 
branco ficaria exposto ao ataque adver- 
Seirio. 18 - ... TD-1D; 19 - D2D P4D; 
20 — D3R{?!). Parece que as brancas 
tentaram pegar as pretas numa cilada. Se 
20 — ... DxPB(P), as pretas perderiam o 
bispo apbs 21 — PxP. Cai o bispo ou 
perdem a dama depois de 22 — BxP+\. 
20 - ...DxD; 21 - PxD BIB; 22 - PxP 
B5C. Novamente as pretas frustam as 
brancas ao nao morder a isca TxP(?), 
pois se o fizessem perderiam a qualida- 
de depois de 23 — BxP+ !. 23 — T2D 
TR1R; 24 — R2B T3D; 25 — B4B T3BR+; 
26 - R3C TxT; 27 - BxT B2D; 28 - 
R4B P4CR. Oferece a troca de um pe3o 
lateral (PCR) por um central (PR). 

29 — R3B. Prudentemente, as brancas 
nao aceitaram essa troca. 29 — ...P4BR; 

30 - T2BR P5C+; 31 - R2R T4R; 32 - 
P4B R2B; 33 - P4TR PxPep;34 - PxP 
P4CD; 35 — T4B. Impunha-se avanpar o 
jogo para o centro do tabuleiro. 35 — 
...PxP; 36 — R3B. As brancas viram, 
agora, que nao podem capturar o PCD 



com a torre por causa de 35 — ...B4C 
cravando-a. 36 — ...P6B; 37 — B4B(?) 
R3B(?). Provavelmente programado pa- 
ra evitar xeques descobertos, o TKA- 
DREZ deixa de avanpar o PBO para a 
casa 7, com subsequente e inevitdvel 
promopao. 38 — R2R P7B; 39 — TIB 
P3B; 40 - P6D B3R; 41 - BxB RxB; 
42 - R3D T4B; 43 - T1BDT4D+. As 
pretas iniciam agora uma s^rie est^ril de 
xeques que levam ao empate por repeti- 
pao de jogadas. 44 — R3B T4R; 45 — 
R4D T4D+; 46 - R4B T4R; 47 - R4D 
etc, quando poderiam f icar com final ga- 
nhador apbs44 — ...RxP. 




PosifSo apds 20 — D3R(?0. A$ brancas ten- 
tam co to car as pretas numa cilada. 
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TKADREZ (ni'vel 2) 
x 

Video Chess Atari (mvel 3} 



1 _ P4R P4BD; 2 - C3BR C3BD; 3 - 
P4D PxP; 4 - CxP P4R; 5 - C5B C3B; 
6 - C3R P4D; 7 - D3B CxPR; 8 - CxC 
BxC; 9 - DxB PxC; 10 - DxPTIB; 11 
- B3D B3D; 12 - 0-0 D2R; 13 - B3R 
D3R; 14 - TR1D T1D; 15 - B4B. As 
brancas aproveitam as perdas de tempo 
ocasionadas por sucessivas jogadas da 
dama preta para conseguirem posigao 
dominante. 15 — ...D2D; 16 — B5CD 
P4TD(?). Depois desta jogada, a recupe- 
rapao da posigao das pretas nao 4 tarefa 
para o Atari. 17 — B6C!. Com esta joga- 
da, as brancas submetem as pretas a for- 
te ataque que termina por dar frutos 
materials decisivos. 17 — ...P4B. As pre- 
tas nao dispoem de jogadas satisfato- 
rias. 18 — D5D, que impede o roque e 
exerce pressao mortal na coluna D. 18 — 
...B2B; 19 - BxC! PxB; 20 - D3B D2R. 
A dama nao pode defender simultanea- 
mente as casas 3BD e 2BD. 21 — DxPD+ 
T2D; 22 — BxB. Captura a primeira pe- 
ga negra. 22 — ...P5R. So um teimoso 
continuaria jogando esta partida total- 
mente perdida. 23 — BxP TIC; 24 — 



PosifSo apds 17 — B6C\. Com esta jogada, as 
brancas submetem as pretas a forte ataque 
que termina por dar frutos materials decisi- 
vos. 



D8B+ R2B; 25 - DxT(7D) P5B; 26 - 
D5B+ R1R; 27 - T4D TIB; 28 - DxPT 
D3B; 29 - DxPR+ D2R; 30 - T1R 
DxD; 31 - TxD+ R2B; 32 - TxP+ 
R1C; 33 — P3TD. Jogada de extrema su- 
tileza, s6 percept fvel por um micro. 33 
- ...T1R; 34 - P3CD T7R; 35 - P4B 
R2T; 36 - T6D P4C; 37 - T5B T7C; 
38 - T7B+ R 1C; 39 - T7R R IB; 40 - 
T3R T7T; 41 - P4TD T7C; 42 - T6CR 
R2B; 43 - TxP R3B; 44 - T<3)5R 



Com final ganho, o TKADREZ permitiu-se 
um empate infantil atravds de sucessivos de- 
ques ao rei preto. 



T7R; 45 - T(5C)5B+ R3C; 46 - T5C+ 
R3B e o TKADREZ persistiu repetindo 
as mesmas jogadas, at£ o empate. Extre- 
mamente frustrante sua performance na 
fase final, apds impor-se nas fases de 
abertura e meio-jogo. Curioso € que ao 
colocar-se a posipao para anJIise no 
TKADREZ, como se fora um problema. 



it 



i uai i^uiianiciiLc, jutjcmuu 

45 — B8D+ e comendo a torre em se- 
guida. ■ 





SOFTWARE 

O Combustfvel do Computador 



Programas para CP 500, DGT 100, TRS 80, Dismac, Poly max e outros 
Temos disponiveis mais de 50 programas especfficos, em 
fita ou diskete, para aplicagdes diversas. 





TABELA DE PREpOS - PROMOQAO ESPECIAL 




PROGRAM A 


FITA ICr$) 


DISKETE <Cr$) 




Contabilidade 


21.120,00 


126.736,00 




Folha de Pagamento 


— 


50.688,00 




Controle de Estoque 


33.792,00 


63.360,00 




Editor de Textos 


16.896,00 


42.240,00 




Mala Direta 


25.344,00 


63.360,00 




Arquivo de Processos 


12.672,00 


— 




Contas Pagar/Receber 


25.344,00 


63.360,00 




Controle de Livros 


8.448,00 


— 




Controle de Cheques 


8.448,00 


— 




Biorritmo 


8.448,00 


12.672,00 




DecisSo 


8.448,00 


12.672,00 




Histograijia 


8.448,00 


12.672,00 




Estatlstica 


9.292,00 


13.516,00 




GrSficos 


9.292,00 


13.516,00 




Obstaculo 


9.292,00 


13.516,00 




Eq. Diferencia! 


9.292,00 


13.516,00 




Controle Saldo Bancario 


— 


42.240,00 




Crediario 


— 


63.360,00 




Multifun^ao 


— 


84.480,00 



£3 



nck/cuon 

/i/temo/* 



Av. Rio Branco, 45 gr. 131 1 

Tel (021) 263-1241 

CEP 20090 — Rio de Janeiro. 




CURSOS DE BASIC 



□ SOLICITE NOSSO 
CATALOGO OU VI SITE 
NOSSO SHOW-ROOM. 



□ DESCONTOS PARA 
REVENDA 

□ ATENDIMENTO POR 
REEMBOLSO POSTAL 
PARA TODOO BRASIL. 



CONTROL&DE ESTOQUE 
.PARA\f>K- 82 ^ 1 ^* ' 

/ NEZ 8.000, CP 200;ip T>K-85 w 
^Prepo t*^ Lanpamento:Cr$6.800,00L, 



Voce tambem encontra esses programas em nossos revendedores credenciados. 



MICRO SISTEMAS, julho/83 



9 











Do is programas — um para o CP-500 e outro para o S-700 — que 
facilitam a entrada de campos numtfricos na tela. 



Delimitadores 
de campos numericos 



Roberto Quito de Sant' Anna 



F requentemente , ao usarmos pro- 
gramas comer ciais (como, por 
exemplo, um pacote de conta- 
bilidade), ficamos impressionados com 
os formatos de telas apresentados 
na comunicagao com o usuario, parti- 
cularmente quando o programa nos so- 
licita dados de entrada. Da maneira co- 
mo sao feitos, 6 praticamente impossf- 
vel ao operador cometer um erro de 
entrada, uma vez que o programa se 
encanega de dizer quando, onde e como 
entrar com os dados. 

No infcio, isto nos despertava sincera 
admiragao, atd que um dia, durante o 
desenvolvimento de um programa em 
nosso bureau, surgiu o desafio: por que 
nao utilizarmos delimitadores de cam- 
pos numericos em nossos trabalhos? 

Em resposta ao desafio, apresento 
dois programas (um para o S-700 e ou- 
tro para o CP-500 ou qualquer compatf- 
vel com o TRS-80) estruturados de mo- 
do a poderem ser facilmente transfor- 
mados em sub-rotinas e aplicados a qual- 
quer programa. 

CARACTERISTICAS 

Basicamente os dois programas nos 
permitem colocar, em qualquer posigao 
da tela, um campo delimitado por re- 
tangulos (ou qualquer outro simbolo), 
no qual os algarismos e, se for o caso, o 
ponto decimal do numero desejado en- 
trarao conforme forem sendo digitados, 
sucessivamente da direita para a esquer- 
da. 



Esta prevista a possibilidade de back- 
space para supressSo ou substituigSo de 
quantos algarismos forem desejados 
e/ou do ponto decimal, assim como a 
possibilidade de cancelar toda a entrada 
e reiniciar, em caso de engano. Alem 
disto, os programas ndo aceitam a ten- 
tativa de colocagao de mais um ponto 
decimal em cada campo e, proposital- 
mente, nSo amarram a posigao do pon- 
to decimal. 

Em ambos os programas, L e C sSo, 
respectivamente , os valores da linha e da 
coluna onde se deseja initiar a delimi- 
tagSo do campo, enquanto N e aexten- 
sao, ou seja, o numero mdximo de ca- 
racteres do campo. Os comentarios so- 
bre alguns detalhes de cada um dos pro- 
gramas, feitos a seguir, facilitarao a sua 
corn preen sao ; 

— linha 60 (s6 para o S-700) — defini- 
gao da fungao FNA$(L,C), que vai su- 
prir a falta do PRINT @; como o CP-500 
possui a instrugSo PRINT@, esta Unlia £ 
desnecessdria. Observe que todas as ve- 
zes em que 6 necessario utilizar PRINT@, 
a posigao correspondente na tela 6 dada 
atraves da variavel auxiliar AT, calcula- 
da segundo a formula AT = 64* (H) + 
C. 

— linha 140 — impressao do delimita- 
dor, atravds da sub-rotina da linha 310; 
os retangulos s2o representados pelo ca- 
rdter ASCII 127 (S-700) ou 138 (CP- 
500). 

— linha 170 — verifica se a ultima te- 
cla digitada foi DEL (CLEAR para o 



CP-500); caso positivo, toda a entrada 
e cancelada e impresso novo delimitador 
(linha 140), reinidando-se o processo. 

— linha 180 — verifica se a ultima tecla 
digitada foi RETURN (ENTER para o 
CFS500); caso positivo, o valor ja entra- 
do € convertido e armazenado em NUM. 

— linha 190 — verifica se a dltima te- 
da digitada foi BS (<-para o CP-500); 
caso positivo, o ultimo carater entrado 
(algansmo ou ponto decimal) e apaga- 
do, todos os demais se deslocam uma 
posigao para a direita e o programa pas- 
sa a aguardar nova entrada. 

— linhas 200-210 — rotina de backspace; 
se o carater a ser apagado 6 o ponto de- 
dmal, PNT e feito igual a zero, para m- 
dicar nSo haver mais ponto dedmal no 
campo. 

— linha 220 — (pmpletado o campo, a 
ultima teda digitada somente pode ser 
DEL, RETURN ou BS, ou suas corres- 
pondentes no CP-500. 

— linha 230 — verifica se o carater en- 
trado foi um ponto decimal; caso posi- 
tivo, se o campo ja contiver um ponto 
(PNT= 1), a entrada nSo 6 aceita. Se o 
campo ainda nSo contiver ponto, PNT 
e feito igual a 1 e a entrada 6 aceita. 

— linha 240 — apos as verificagOes an- 
teriores, rejeita qualquer card ter nSo- 
numerico e aguarda nova entrada. 

— linha 250 — montagem de Z $ , string 
do valor a ser convertido. 
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— linhas 260 a 280 — impressffo, no 
campo delimitado, dos caracteres acei- 
tos atd a ultima entrada. 

— linha 290 — conversao do valor acei- 
to (NUM#), definido como de dupla 
precisao, para poder representar valores 
com mais de 7 digitos. 



Roberto Quito de Sant' Anne 4 Engenhelro de 
TetecomunicapSes, formado peio Instituto Mi- 
litar de Engenharia. Professor da cadelra de 
Informdtica da Academia MiUtar das Agulhas 
Negras, desde agosto de 1982, 4 tambdm cola * 
borador da MICRO-MAXI Computations e 
Slstemas, como Analista de Sistemas. 





/mmr rmr&a ea 

System Design Ltdo. • Informatica 



Delimitador de campo numerico — S700 

10 ' ########*##*##**#*##»#«#*#*#*******##*####******# 

20 '**«#DELIMITADGR DE CAMPO NUMERICO PARA S-700**** 

30 '» ROBERTO QUITO DE SANT ’ ANNA * 

MO ' #CAIXA POSTAL 24039 - CEP 2052?. - R JANEIRO - RJ* 

50 '*#****#****####**##*#**##*###*###*»#***********#* 

60 DEF FNA*<LrC>=CHRt<2?)+"Y"+CHR*<L+32>+CHR*<C+32) 

70 REM w*«##ENTRADA DA P0SICA0 E DO TAMANHO DO CAMPO 

80 INPUT "LINHA? "»L 

90 INPUT "C0LUNA? ",C 

100 INPUT "TAMANHO DO CAMPO? ",N 

110 REM ****#AQUI C0MECA A RDTINA PROPRIAMENTE DITA 
120 LIM=C+N:X=LIM~1:FIM=N+1 
130 DIM At < FI M) s PRINT CHRt<12) 

140 G0SUB 310:Zt="":PNT=’0 
150 FOR 1=1 TO FIM 

160 PRINT FNAt(L,X) f : At < I > ="" : At < I ) =INKEYt : IF At<I)="" GOTO 160 
170 IF ASC(A$( I ) ) =127 GOTO 140 
180 IF ASC ( At ( I ) ) = 13 GOTO 290 
190 IF ASC < At ( I ) ) 08 GOTO 220 

200 IF I<=2' BOTO 140 ELSE IF ASC ( At < I -1 ) ) =46 THEN PNT=0 
210 I=I-2:Zt=LEFT t ( Zt , I ) : GOSUB 310:60TO 260 
220 IF I=FIM GOTO 160 

230 IF ASC < At ( I ) ) = 46 THEN IF PNT=1 GOTO 160 ELSE PNT=1:GDT0 250 
240 IF ASC (A* (I)) <48 OR ASC < At ( I ) ) >57 GOTO 160 
250 Z$=Z*+At(I) 

260 J=IsF0R K = X TO LIM-I STEP -1 
270 PRINT FNAt(L,K); At(J) 

2BO J== J— 1 : NEXT K 5 NEXT I 
290 NUM«=0AL(Zt) 

300 PR I NT SPRINT: PRINT SPRINT "0 NUMERO ACEITQ E " » NUMW s END 
310 PRINT FNAt (LfC) ; STR INGt ( N „ 127) r : RETURN 



Delimitador de campo numerico — CP-500 

10 '#*#*#*#*»*####**»****# a*###*#****##*#*##*###***#* 

20 '*#**DEL3MITAD0R DE CAMPO NUMERICO PARA CP 500**#* 

30 '********** #**####* *#####***##**#*##*#»#«*«#»***:** 

40 ' # ROBERTO QUITO DE SANT' ANNA * 

50 ’ eCAIXA POSTAL 24039 - CEP 20522 - P. JANEIRO - R J* 

60 '#*##*#*#*#*#«*##*#**####**«■***##**»####*####****# 

70 REM ####*FNTRADA DA POSICAO E DO TAMANHO DO CAMPO 

80 INPUT "LINHA "vL 

90 INPUT "CDLIJNA " ? C 

100 INPUT "TAMANHO DO CAMPO ";N 

110 REM ***** AQUI COMECA A RDTINA PROPRIAMENTE DITA 
120 L.IM»C+NsX = LIM-l :FIM=N+1 
130 DIM A* { FIM } s CLS 

140 AT = 64# < L 1 ) +C sBOSUB 310sZ*«"": PNT=0 
150 FOR 3=1 TO FIM 

360 A* < I ) =" " s At < I ) * INKEYt : IF At ( I ) = ”" GOTO 160 
170 IF ASC ( At < I ) ) =31 GOTO 140 
1B0 IF ASC < At < I ) > *13 GOTO 290 
190 IF ASC < At < I ) ) 08 GOTO 220 

200 IF I<=2 GOTO 140 ELSE IF ASC < A* ( T-l ) ) *46 THEN PNT<*0 
210 I = I~2s Zt=l. EFTS ( Zt » I) sAT=64#(L-l )+Cs GOSUB 310s GOTO 260 
220 IF I = F I M GOTO 160 

230 IF ASC (At <J) )=46 THEN IF PNT=1 GOTO 160 ELSE PNTr-lsGDTO 250 
240 IF ASC ( At ( I ) ) <48 OR ASC< At < I ) >>57 GOTO 160 
250 Z*=Z*+At<I) 

260 J=I : FOR K=X TO LIM-I STEP - I. 

270 AT = 64#<L- 1 )+Ks PRINT <3 ATJAt(J) 

200 J=~J-1. : NEXT Ks NEXT I 
290 NUMH=VAL(Zt) 

300 PRINT s PRINTS PRINTS PRINT "0 NUMERO ACEITO F “ . Nil MM s END 
310 PRINT !? AT? STRING* ( N. 1 3B) s RETURN 



SOFTWARES DISPONIVEIS PARA 
MICROS EM DOS (Apple e Similares) 

PASSO A PASSO - Curso de Basic em 
diskette de fact). r6pldo e eflclente apren- 
dizado no seu proprlo micro Cr® 60.000,00 

MAILER - Mala direta com v&rlas opcoes 
de emlssao Cr® 35.000,00 

MICROWRITER - Eflclente procsssador de 
textos Cr® 60.000,00 

DOS 3.3 BASICS - Utilitfirlo para Otlmlzar 
seu DOS Cr® 45.000,00 

JOCOS - Vdrios logos estrat&glcos e de 
aventura Cr® 15.000,00 

Olimpiada, Simulador de v6o, Xadrez, 
Chopllfter (•*), Castelo Wolfenstein, Casa 
dos Mlsterlos, Combate AerBo (*) Invaders 
(*), Zork (*). 

* utlllzam DOS 3.3 BASICS 

** Utllizam control adores (joystlck/paddles) 



PEDIDOS - AtravBs do cheque nominal & 
nossa calxa postal ou por to I of one 
(Atendemos todo o Brasil via VARIG). 

CEP 05096 - Cx. Postal 60136 - S. Paulo 
Tel.: 813-4031 



NUMtt : END 





Cursos de programagao com 
APOSTILA PROPRIA e AU- 
LAS PRATICAS em dtversos> 
MICROCOMPUT ADORES % f 
— Todas as principals marcas 
" yde MICROCOMPUTADORES 
,pelo menor prego com credi-' 

• to direto em ate 24 MESES 
Programas prontos ou por 
encomendas tanto de jogos 
quanto comerciais 
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O recurso da alta resolupao grafica nos micros compatfveis com o Apple 
e de grande ajuda na animacao de figuras. 



A animacao de figuras 
com alta resolugao 

Carlos Alberto Jahara 



tela de alta resolu?ao grafica (HGR) e uni dos melho- 
res recursos dos micros compatr'veis com o Apple 

(Microengenho, AP II, Maxxi) ja que as duas paginas 

que a compoem permitem, facilmente, executaramma^ao de fi- 
guras, como voce vera a seguir (devc-se ter 48Kb RAM). 

Cada uma destas pa'ginas ocupa 8 Kb de RAM. A primeira 
vai de Hex $2000 (8192) ate HcxSSFFF (1 6383), segmda ime- 
diatamente da segunda que vai de Hex$4000 (16384) ate 
Hex S5FFF (24575). 

Estas areas podem ser visualizadas na tela se determinadas 
chares forem acionadas convenientemente. Estas e haves (lo- 
cahza^oes especiais de memorial quando mencionadas ativanr 



o hardware necessario para a visualiza^ao. Veja na figura 1 a 
loealizaijao das chares e sua fun^ao. 



GRUPO 


HEX 


DECIMAL 


FUNgAO 


1 


CQ5Q 


- 16 306 


Tela grafica 




C 0 5 1 


-16303 


Tela texto 


2 


CGS2 


- 16302 


Tc la che 1 2 




C053 


- 1830 1 


Tela mlxada texto/ g ra f i co 


3 


CO 56 


- 16300 


Pag • na 1 




COSS 


- 16299 


Pag i na 2 


k 


C 0 5 6 


- 16298 


Ba i xa-Reso 1 ujSo Grafica 




C057 


-16297 


A 1 ta-Resol ugao Grafica 



Figura l 



Animacao Complexa 



100 REM AH 1 MACRO COMPLEXA USAN 

DO 2 PRGINAS 
105 : 

110 REM I.1MPA AMBAS RS TELfiS 
120 : 

150 POKE 230,32: CALL 62450: POKE 



230, 


64: CALL 62450 


: POKE - 


16304,0: POKE - 16297,9: POKE 


- 1 


6302,0: POKE 


- 16300,0 


197 


; 




198 


REM CARRERA 


OS SHAPES 


199 


• 




280 


GOSUB 950 




250 


FOR XC = 9 TO 


266 STEP 4 


300 


HCOLOR” 3 




347 






348 


REM PLOTR HA 


PAGINA 1 


349 


: 




350 

0 

397 


POKE 230,32: 


ORAL! 1 AT XC, 10 



39R REM PLOT A Nfl PAG I NR 2 

399 : 

400 POKE 230,64: DRAU 1 AT XC t 

2 , 100 

447 : 

448 REM MOSTRR A PAGINR 2 

449 : 

450 POKE 16299,0 
500 HC0LGR= 0 

547 : 

548 REM RPflOA R PROINfl 1 

549 : 

550 POKE 230,32: ORflU 1 RT XC,10 
0 

600 HC0L0R= 3 

647 : 

648 REM PLOTR FIGURA SEGUINTE N 
fl PA61NA 1 

649 : 

650 DRRU i AT XC + 4,100 

697 : 

698 REM MOSTRR A PAG I NR 1 



699 : 

700 POKE - 16300,0 
758 HC0L0R= 9 

797 : 

798 REM APAGA A PAGINAV. 

806 POKE 230,64: DRRU 1 AT XC + 
2 , 100 
850 NEXT 
998 END 
947 : 

943 REh TflBELA DE SHAPES 

949 i 

950 DATA 1,0,4,0,45,45/34,54,45 
,45,54,62,55,62,39,60,63,63, 
54,63,36,63,36,36,37,37,37,4 

5,0 

1000 FOR X = 768 TO 796: READ SO 
: POKE X , SO : NEXT 
1050 POKE 232,9: POKE 233,3 
1100 SCALE* 1: R0T= 0 
1150 RETURN 
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Ao hgarmos o computador ou ap6s urn RESET, a configu- 
ragdo normal das chaves passa a ser: modo texto, pagina 1 , mi- 
xado texto/grdfico e baixa resolucao grdfica. Observe que en- 
quaiito o modo texto estiver ligado, a tela de baixa resolugao 
grafica nao aparece. Nao esquega que os pares de chaves sao 
complementares, isto e, quando uma chave e ligada sua com- 
plementar se deshga automaticamente. 

USANDO POKE EM BASIC 

Para acioriar uma chave que esteja em BASIC, utihzaremos 
o comando POKE. Urr POKE 16304,0 (qualquer valor menor 
que 255 poderia ser colocado no lugar do 0) ira mudar de tex- 
to para grafico. mas o modo grdfico que aparecera (alta ou 
baixa resolucao) dependera da chave do grupo 4 que estiver 
ligada. 

Estando no monitor is t.0 se torna mais fa'cil, basta escrevcr o 
valor em hexadecimal scguido de RETURN. Isto ira retornar 
urn valor sem sentido e a chave sera acionada. Vamos testar urn 
exemplo direto no monitor? 

Ligue o computador e pressione RESET, Para entrar no mo- 
nitor tecle CALL-151 c aperte RETURN. Devera aparecer um 
astensco na tela mdicando o modo monitor. Agora tecle 
C050 e aperte RETURN. Voce esta em modo grdfico (baixa 
resolucao, mixado, pdgina 1); agora tecle as mstrugoes a seguir 
e observe as mudangas: 

C057 RETURN Alta Resolugio Pagina 1 
C 0 5 5 RETURN - Alta Resolugio Pagina 2 

C 0 5 2 RETURN - Tela Cheia 

C 0 5 1 RETURN - Texto Pagina 2 

C 0 5 4 RETURN - Texto Pagina 1 

Vamos entrar com um pequeno programa no monitor. Co- 
pie exatamente a linha: 

0 300: 8D 50 CO 8 D 52 CO 8D 57 CO 8D 54 

CO 8D 55 CO 20 09 03 



Agora tecle 300L RETURN (comando que manda hstar a 
partir de $300) e vera: 



0 


300 


8d 


50 


CO 


STA 


C 050 


0 


303 


8d 


52 


CO 


STA 


C 0 5 2 


0 


306 


8d 


57 


CO 


STA 


C 0 5 7 


0 


309 


8d 


5^ 


CO 


STA 


CO 5*t 


0 


30C 


8d 


55 


CO 


STA 


C 0 5 5 


0 


3 0 F 


20 


09 


03 


JSR 


0 309 



Este programa acionara: modo grafico, tela cheia, alta reso- 
lugao grafica, pdgina 1 e pagina 2. O looping alternara as 
paginas 1 e 2. Agora tecle 300G RETURN (comando que roda 
o programa a partir de $300) e para parar aperte RESET. Note 
que uma simples mstrugao ST A e' necessaria para aconar a 
chave. 

Volte para BASIC e execute o programa a seguir que e o 
mesmo ja escnto antenormente em linguagem dc ma'quina. Ob- 
serve que em BASIC sua velocidade sera menor. 



1 00 


POKE 


- 1 6304 


,0 


200 


POKE 


-16302 


,0 


300 


POKE 


-16297 


,0 


4oo 


POKE 


- 1 6300 


,0 


500 


POKE 


- 1 6299 


,0 


600 


GOTO 


400 





Agora digite HGR ou HGR2. Veja que quando o comando 
HGR e teclado, as chaves C050, C053, C054 e C057 sao hga- 
das, uma rotina que coloca zeros de $2000 a S3FFF e exe- 
cutada paralimpar a tela e $20(32) e colocado em $E6(230) 
para dizer as rotinas de Shapes para plotarem na pdgina 1 , 
Ja quando teclanros HGR2 as chaves tela cheia (C052) e 
pdgina 2 (C055) sao ligadas, enquanto $40(64) e colocado 
com $E6 (230) e lnnpam tambem a pagina 2. 

Como HGR e HGR2 limpam toda a tela, estes comandos 
sao usados, geralmente, apenas uma vez no mi'cio do programa. 
E importaiite fnsar. tambem, que as hnhas 100 e 400 do pro- 
grama i sSo executadas sem hmpar a tela. 

Temos dois excmplos que mostram caminhos diferentes pa- 
ra fazer a animagao de tim desenho. O pnmeiro (Animagao 
Simples) e um pequeno e rapido programa que sofre uma osci- 
la^ao enquanto e executado, resultando numa animagao qua- 
se perfeita. Ja o segundo trata de uma anima^o mais cornple- 
xa e seu resultado i perfeito. Nele sao usadas as paginas 1 e 
2 para conseguir este efeito. 

Examine estes exemplos e veja como as chaves sao titeis e 
poderao ajuda-lo em seus futuros programas. B 

m 



Carlos Alberto Jahara 4 Engenheiro Civil, formado pela Escola Poli- 
tdcnica da USP em 1980 e trabalha na Promon Engenharia em progra- 
mas de cdlcuios de estrutura. Carlos Alberto 4 usudrio pessoal de um 
Apple II plus hd cerca de um ano. 



Animacao Simples 



100 
122 : 


REM 


AN1I1ACA0 SIMPLES 


125 


REI1 


LIMPA F COLOCfl A TELFI 


CHEIA 
127 : 




159 
174 : 


HGR : 


POKE - 16302,0 


175 

176 : 


REM 


ENT RADA DO SHAPE 


200 


GOSUB 


558 


250 
254 : 


FOR XC = 0 TO 268 STEP 2 


255 

256 : 


REI1 


DESENHA 0 CARRO 


300 
324 : 


XDRRU 


1 AT XC, 100 


325 

326 : 


REtt 


APAGA 0 CRRR0 


350 


XDRAU 


1 RY XC, 100 


400 


NEXT 





450 END 

499 : 

500 REH 0 SEGUINTE DFlTfl E tin SH 
APE QUE E COLOCADO (POKE) NR 

LIEM0RIA r PORT IR DE $0300 

501 : 

550 OATH 1,0,4,0,45,45,54,34,4-5 
,45,54,62,55,62,39,60,63,63, 
54,63,36, 63, 36,36, 37, 37, 3?, 4 
5,0 

600 FOR X = 768 TO 796: READ SU: 
POKE X , SU: HEXT 

624 : 

625 REM ENDEREG0 INICIBl. DO SHR 
PE 

626 : 

650 POKE 232,0: POKE 233,3 
700 SCRLE= 1: R0T= 8 
750 RETURN 



YATECK 

DGT-100 - PROLOGICA 

Autorizado 

Manutengao: TK, ZX-81, 
OSBORN, APPLE, etc. 
Transformagoes 
Adaptagoes Diversas 

Rua Visconde de PirajS, 82 subsolo loja 
1X5 - lpanema - Rio - RJ. Tel. 247-7842 
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Vamos ver como sao impfementados os chips de memdrias na UCP 
e qua! o pape! dos decod ificado res neste processo. 




A implementacao das memorias 



Orson Voerckel Galvao 




migos, com este artigo encerra- 
mos mais uma etapa na nossa 
tentativa de familiarizar o pu- 
blico leitor de MICRO SISTEMAS com 
os microprocessadores e com um jargao 
tdcnico cada vez mais difun dido em vei- 
culos de propaganda e informagSo. 

Hoje iremos tratar das memdrias. Jd 
haviamos falado anteriormente neste 
componente vital do computador. Po- 
rdm, ndo foi descrito como implementd- 
las, o que comegaremos a fazer aqui. 

Em primeiro lugar, a memdria nSo 6 
um componente discreto, mas sim um 
conjunto de chips de silicio e outros 
componentes que, interligados e de for- 
ma apropriada, form am um banco de 
memdria. 

Um chip de mem6ria € constituido 
por uma matriz de armazenamento na 
qual cada elemento 6 um bit (ou um 
conjunto de bits) e um drcuito de en- 
deregamento que permite que cada um 
dos elementos da matriz seja acessado 
individualmente . 

Entretanto, quando 6 feito o acesso 
em um chip de memdria, geralmente 
nao esta se enderegando um byte com- 
pleto e sim um ou alguns bits. Para que 
obtenhamos um byte completo 6 neces- 
sdno que se utilize diversos chips em 
paralelo, cada um ligado a uma das li- 
nhas da via de dados. 

Por exemplo, existe um chip chama- 
do 4262 que tern uma capacidade de ar- 
mazenar 2048 bits de informagOes. Diz- 



se que 6 uma memdria organizada em 
2048x1, o que quer dizer que pode-se 
acessar individualmente 2048 bits. 

Uma outra memdria, a 8111, tern or- 
ganizagSo diferente. Ela pode armaze- 
nar 1024 bits, mas estes bits sd podem 
ser acessados em grupos de quatro, ou 
seja, ela e organizada em 256x4. 

Comparando uma com a outra, va- 
mos ver que para formar um byte com- 
pleto com a 4262 vamos precisar de oi- 
to chips hgados em paralelo, cada um 
fomecendo um bit do byte. Jd o segun- 
do chip, o 81 11 , permite que utilizemos 



apenas dois componentes para formar- 
mos um byte inteiro. Na figura 1 estd 
representada a pinagem de um chip de 
memdria e na figura 2 um esquema tipi- 
co de um conjunto de chips de memdria. 

Agora vamos falar sobre o enderega- 
mento dos chips. Notaram que um chip 
tern uma capacidade limitada de armaze- 
namento? No caso dos dois drips ati- 
ma citados, temos 2 e 1 Kbits de capaci- 
dade. Pordm, os microprocessadores de 
8 bits permitem acessar atd 64 Kbytes 
de memdria. EntSo como fazermos pa- 
ra implementar uma memdna de 64 Kb? 
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Figura 2 - Esquema ti'pico de conexao de diversos chips de memdria para 
a obtengdo de 1 byte. 



Tomando como exemplo um chip 
4262, vimos que para formarmos um 
byte s3o necessdrios oito chips. Assim, 
jd teremos 2 Kbytes de memdria. Po- 
rdm, faltam-nos ainda 62 Kb, ou seja, 
mais 31 conjuntos de 8 chips de memd- 
ria. 

Atd aj tudo bem. Mas como endere- 
farmos cada um dos conjuntos de 2 
Kbytes individualmente? Bem, o micro 
dispoe de 16 linhas para o enderegamen- 
to de mem6ria. Como cada conjunto de 
chips necessita de apenas dez linhas de 
enderegamento para que se acesse cada 
uma das 2048 posigOes (com 1 1 bits po- 
demos contar de 0 a 2047 em bindrio), 
sobram-nos ainda 5 linhas para fazermos 
a selegao do conjunto de chips ao qua! 
se deseja al can far. Usando tal esquema, 
teremos que o primeiro conjunto for- 
nece-nos enderegos de 0 a 2047, o se- 
gundo de 2048 a 4095, o terceiro de 
4096 a 6143 e assim por diante atd que 
o 329 conjunto nos esgote a capacidade 
de enderegamento do micro: 64 Kbytes. 

Vejamos entao como selecionar cada 
um dos conjuntos de memdria utilizan- 
do as cinco linhas de enderego que nos 
sobraram. Para tal sera necessdrio que 
apresentemos ao leitor um novo compo- 
nente: o decodificador bindrio, cuja re- 
presentagao esta na figura 3 . » 



SELEfAO DO 
CONJUNTO DE 
CHIPS DE NEHCRIA 



SELEgAO DO 
DEC0D1EI CADOK 



L 6 G I C A 




CADA UM DESTES 5INAIS 
ESTA CONECTADO AOS PINOS 
TT5 OE UM CONJUNTO DE 
CHIPS DE HEHbRIAS 



Seleqao do Decodificador : El e E2 em nivel baixo 

E3 em nivel alto 

Selegao do Conjunto de Chips : 



A o 


A 1 


A 2 


PINO ATIVADO 


0 


0 


0 


00 


1 


0 


0 


01 


0 


1 


0 


02 


1 


1 


0 


03 


0 


0 


1 


04 


1 


0 


I 


05 


0 


1 


1 


06 


1 


1 


1 


07 



Figura 3 — Representagao grdfica de um decodificador bindrio 1x8. 
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A IMPLEMENTAgAO DAS MEMORIAS 



SUPPLY 



EM PD, TUDO 
OQUEVOCt 
NECESSITA NUM 
S6 FORNECEDOR! 

E a Supply nSo tent apenas tudo e quatquer li- 
po de material para CPD’s. Tern lamktm os 
melhores prefers e a mats r&pida entrega. Isso 
porque a Supply tern um estoquecompleto das 
melhores marcas existentes no mercado, po- 
dendo assim atender — com a mesma eficidn- 
cla 1 ;— desde empresas de grande porte alt pe- 
quenos consumidores. .] S" 

Se o seu problema for suprlmentos para Proces- 
samento de Dados, prego ou prazo de entrega, 
consulte antes a Supply. V-"' ; 

Voei lari boos negddoi * bona aulgot. 




- \ V, -,V / v t’ v «f /»' 



Suprlmentos e Equipamentos para Proces- 
satiYehto de Dados Ltda.- •- ,V‘ k y.t‘> 
Rua Padre Leandro, 70 — Fonseca 
CEP 24120 - Tel.: 722-7937 NiterOi - RJ. 



OUTROS ESTADOS: 

Pernambuco, Rio Grande do Norte e Parai- 
ba: Filial Recife: (081) 431-0569 — Alagoas: 
CORTEC: (082) 221-5421 — Cearat OATA- 
PRINT:(085) 226-9328 — Mato Grosso: FOR- 



TALEZA: (067)382-0173 






TK-82 TK‘85 

CP-900 

Mm llll 







Comerciais, financeiros, 
cientificos e games como: 

Formula I 

Em busca do tesouro 
Simulador de voo 
Microcalc 
Invasao cbsmica 
Controle de estoque 
Las Vegas 
Viga continua 
e muitos outros 

Cartucho Atari 

Aplicalivos p/CP-500, Digilus e Polimax 

Distribuigao exclusive de programas das 
marcas microune. infinitus e supersoft 

PEgA CATALOGO GRATIS 




O decodificador bindrio tem por fina- 
lidade fazer com que a partir dos smais 
presentes nos pinos A 0 , Aj e A 2 seja 
ativado apenas um dos pinos entre 00 a 
07. Se cada um destes ultimos estiver 
conectado a um conjunto diferente de 
chips de mem6ria, teremos conseguido 
seledonar Uma faixa de enderecos de 1 6 
Kbytes. Utilizando dois decodificadores, 
poderemos atingir 32 Kb, com tres 48 
Kb e com quatro 64 Kb. 

Os sinais El , E2 e E3 s3o utilizados 
para seledonar qual dos decodificadores 
estara ativo a um determinado momen- 
to. Desta forma, se utilizarmos tres li- 
nhas de endere^o para decodifica^o e 
as duas restantes para selegSo do decodi- 
ficador, teremos os nossos 64 Kb de me- 
m6ria. Resumindo, tendo um micro 
que nos permita endere9ar 64 Kb de me- 
m6ria por meio das linhas de endere^o 
A 0 -A 1S e se a memdria estd implemen- 
tada por meio de grupos de chips de 
2048x1 bit de capaddade, pode-se utili- 
zar as linhas A 1S e A 14 para seledonar 
um dos decodificadores responsavel pe- 
las faixas de 0 a 1 6 Kb, 17 a 32 Kb, 33 a 
48 Kb e 49 a 64 Kb. 

Seledonado um dos decodificado- 
res,. as linhas de enderefo A 13 , A l2 e 
An sao utilizadas para seledonar, atra- 
v£s das saidas do decodificador, um dos 
conjuntos de chip de mem6ria de 2 Kb. 
Seledonando o conjunto, as linhas de 
endere^o A 10 a A 0 endere^am o byte 
no mesmo conjunto. Na figura 4 est2 
um esquema simplificado do que foi ex- 
posto. 

A grosso modo, 6 assim que € consti- 
tuida a memoria de um micro. E com 
rela^o aos perifgricos, como se d£o as 
coisas? De certa forma 6 mais simples, 
pois o 8080 permite-nos endere9ar indi- 
vidualmente apenas 256 perifericos. Po- 
r£m, atravds de uma tecnica conhecida 
por I/O niapeado na memdria ( memory 
maped I/O), nao s6 € possivel o aumen- 
to da capaddade de conexSo dos peri- 
fdricos como tambem cria-se a capadda- 
de de utilizar instru^Qes de manipula^o 
de memdrias em perifdricos. 

Mas, qual a importanda disto? fi que 
as in stru^es para a manipulafSo de 
perifdricos (IN e OUT) acessam apenas 
o acumulador do micro. As instru9<5es 
de memdria acessam tanto o acumula- 
dor como os demais registradores, aos 
pares ou individualmente. 

A implementa93o desta arquitetura e 
um tanto complicada, mas imaginemos 
o seguinte: abrindo-se mSo de uma parte 
da memdria, colocariamos ai diversos 
periftricos que seriam enderecados co- 
mo se fossem a prdpria memdria. 



Pois 6 isto mesmo o que ocorre. 
Quando a UCP for executar uma instru- 
93o envolvendo este endere90 de memd- 
ria do qual se abriu m3o, ela estarri na 
realidade acessando um perifiSrico. 

Bern, ai estfo, de uma forma bem 
simplificada, alguns aspectos do fundo- 
namento de um micro. Se o leitor dese- 
jar aprofundar-se no assunto, poderd 
consultar a bibliografia ao final do ar- 
tigo. Pordm, para quern n£o deseja ficar 
sd na teoria e quer meter a mfio na mas - 
sa, que na minha opiniSd 6 mais provei- 
toso, deve adquirir um kit de aprendiza- 
do de microprocessadores como o 
FAST-1, o Microbanana, o KMD-85, o 
Nanocomputer, o TSI-1000 ou quais- 
quer outros similares, nadonais ou es- 
trangeiros. 
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MICRO TEM ASSISTENCIA 
TECNICA DE GRANDE PORTE. 

Ha mais de 1 2 anos a MS presta atendimento a uma serie de empresas, 
no conserto e manutengao de computadores dos mais diversos portes 
e marcas . E toda essa bagagem tecnica esta tambdm a sua disposigao, 
garantindo o desempenho ininterrupto do seu micro. 

• Socorro urgente teletonico - chamou-chegou! 

• Check-ups preventives 

• Reparos 

• Substituigao de pegas com garantia 

• Substituigao do micro ou unidades perifericas 

• Corrtratos de assistenda tecnica a empresas e particulares. 

Na MS a vida de sua mdquina esta garantida. 



Vfie 



MS - Assistencia Tecnica a 
Microcomputadores 

Rua Astolfo Araujo, 521 - Tel.: 549-9022 
CEP 04008 - S. Paulo - Capital 





Figura 4 — Esquema de enderegamento da memdria 
utilizando-se decodificadores. 



Representante no Brasil da: MDS - Mohawk Data Sciences/MSI - Data Corporation 



■MR 



Comercio e Represenfagdes Lida. 



SOFTWARE DISPQNIVEL 



— Contabilidade Geral 

— Contas a Pagar 

— Contas a Receber 

— Arquivos/Mala Direta 

— Editor de Textos 

— Folha de Pagamento 

— Administrate de Imoveis 

— PERT/CPM 

— Sistema Estatfstico 

— Consultor 

— Visicalc 

— Visidex 

— CItilitSrios 

E v^rios Outros 



APPLE/TRS- 80/UNITROM/ POLYMAX 
MICROENGENHO/NAJA/DGT100/CP500 



L.H.M. SOFTWARE & HARDWARE 
Av. Franklin Roosevelt, 23 Grupo 1203 
Tel.: 262-5437 - Cep. 20.021 - R.J. 



Ml CRO SISTEMAS, julho/83 










J Sjrso 



• Dando continuidade A sua programagSo, a 
MICROMAQ oferece para o mes de julho os 
seguintes cursos: "BASIC para adolescantas", 
de 18a 27, diariamente das 08:00 As 1 1 :00h, 
ao prego de Cr$ 35 mil; "BASIC bAsico", de 
25 a 29; diariamente das 18:30 As 21 :30h, ao 
prego de Cr$ 30 mil. Nas aulas prAticas, os 
participantes utilizarao os micros Maxxi, CP- 
200, Dismac, Microengenho, TK82-C, HP-85A 
e DGT-100. Inscrigoes e informag5es na Rua 
Sete de Setembro 92, loja 106 ou pelo tele- 
fone (021 ) 222-608 8, Rio de Janeiro, RJ. 

• A loja Sacco estA promovendo um curso 
de BASIC no mes de julho. 0 curso terA in i- 
cio no dia 18, serA de 15 horas, de segunda a 
sexta-feira, das 19:30 as 22:30h. Maiores in- 
formagBes na Av. EusAbio Matoso, 167. Tel.: 
(0111 814-0598, Sao Paulo, SP. 





UMA FIRM A ESPECtAUZADA EM FORNECER 

A informAtica 



MANTfM ES TOQUE DE: 



- SEMWONDUTORES E PERIFERICOS 
- EXCIUSIVAMENTE PARA AS INDUSTRIAS 

- da area de informAtica 

- CM6S ms DISPLAYS ■ MEM 6 HI AS 

- TRANSIST0RES - DI0D0S - D/SKETS 



CD SOA APOIO RAP/DO E SEGUR0 

A informAtica 



Rua Vitoria, 210 ■ Conj. 2 
Teleton as: 223 1622 e 223 3546 CEP 012216 
Sao Paulo - SP. 



• A Microshop promove regularmente cursos 
na Area de microcomputadores. No dia 18 de 
julho terA im'cio o curso de "AplicagBes Fi- 
nanceiras Estatfsticas de Projetos Vtsicalc". 
No dia 25 de julho comegerA o curso de "Ini- 
ciagao em Microcomputadores a BASIC". Dia 
1 de agosto, cursos de "Visicalc, Visible e Vi- 
siplot", e dia 8 de agosto inicia o curso de 
"BASIC avangado parasistemasoperacionais”. 
Todos esses cursos s3o para executives, em 4 
semanas rotativas, durante quatro dias, no pe- 
rfodo noturno das 7:30 As 22:00h. Para as 
criangas, a Microshop estA promovendo, du- 
rante o mAs de julho, um curso de iniciagAo 
em micros. Maiores informagBes A Av. Lorena 
652, Jardim Paulista, S3o Paulo, tel.: (011) 
282-2105. SP. 

• A DM/Micro estA promovendo cursos de 
Gerenciamento de Banco de Dados no mes de 
julho, com treinamento de 16 hs em micro- 
computadores. O primeiro treinamento bAsico 
serA realizado nos dias 14, 16 e 18 de julho a 
o segundo, nos dias 21 , 23 e 25. 0 treinamen- 
to avangado serA realizado nos dias 28 e 30 de 
julho e 02 de agosto. O horArio A de 13:00 as 
18:00 h e as aulas prAticas serffo dadas das 
18:00 3s 22:00h. Maiores informagSes, na Av. 
Alfonso Bovero, 218, tel.: (011) 263-0711, 
SP. 



• Diversos cursos da Area de informAtica es- 
t§o sendo promovidos pelo Nucleo de Compu- 
tagao Eletronica da UFRJ. Sao eles: BASIC — 
de 14/07 a 05/08, 48 vagas, das 12:00 as 
14:00h, prA-requisito: qualquar linguagem; 
PROCESSAMENTO GRAFICO - de 27/07 a 
04/08, 24 vagas, das 10:00 3s 12:00h, pre- 
requisite: FORTRAN; FORTRAN — 11/07 a 
04/08 225 vagas, em tr£s horArios: 08:00 3s 
10:00h, 12:00 As 14:00h e 14:00 as 16:00h, 
prA-requisitos: 29 grau;SPSS— 1 1/07 a29/07, 
50 vagas, das 08:00 As 10:00h, prA-requisito: 
29 grau e nogSes de estatfstica e computagao; 
ALGOL - 11/07 a 04/08, 75 vagas, das 10:00 
as 1 2 :00h, prA-requisito: qualquer linguagem. 
£ necessArio a apresentagAo de comprovante 
do prA-requisito exigido no ato da inscrigao. 
Maiores informagoes na Secretaria de Cursos, 
sala C-1010 do Nucleo de Computagao Ele- 
tronica, no bloco C do CCMN — Cidade Uni- 
versitAria — Caixa Postal 2324, tel.: (021) 
280-7686, CEP 20.001, Rio de Janeiro, RJ. 

• A INFORMAX estA promovendo dots cur- 
sos no mes de julho: "Curso de Programagao 
BASIC", com im'cio no dia 18 de julho, As 
segundas equartas-feiras.das 20:00 As 22:00h., 
com duragSo de um mes e o "Curso de Intro- 
dugao a MicroinformAtica", com infeio no dia 
19 de julho. As tergas e quintas-feiras, das 
20:00 As 22:00h., duragao de um mes. A ln- 
formax tambAm promove regularmente cursos 
de Processador de Textos Visicalc, Visidex 
etc. Maiores informagBes na Av. Brigadeiro 
Faria Lima, 1857. Sao Paulo. Telefone: (01 1 ) 
814-0682. SP. 

• A AD-DATA EDUCAgAO E INFORMA- 
TICA promoverA curso de Introdugao A In- 
formAtica-Programagao BASIC para iniciantes, 
com 45 hs/aula e pregos especiais para grupos 
fechados. Maiores detalhes podem ser obtidos 
na Rua Joffo Ramalho 818 — tel.: (011)864- 
8200 - SSo Pauto, SP. 



• Cursos de linguagem BASIC na Nasajon 
Sistemas: perfodo de 20hs, duragao de duas 
semanas, das 19:00 As 21 :00h, pelo prego de 
Cr$ 25 mil. Esses cursos sSo ministrados em 
turmas de dez alunos, cpm distribuigAo de 
apostilas programadas, em aulas prAticase ted- 
ricas nos micros Dismac e Digitus. O enderego 
da Nasajon Sistemas A Av. Rio Branco, 45, 
grupo 1311, tel.: (021) 283-1241, Rio de Ja- 
neiro, Itj. 

• A SUCESU-SC continue com seu piano de 
treinamento para 1983 oferecendo o curso de 
“Projeto de Sistemas On-Line" nos dias 20, 
21 e 22 de julho, no BalneArio de Camboriu, 
SC. E bom lembrar que terA desconto de 20% 
sobre o valor total do curso a organizagao que 
efetuar o pagamento das inscrigoes atA dois 
dias antes da realizagao do evento. Maiores in- 
formagSes pelo telefone (041) 222-7613. O 
enderego da SUCESU em Santa Catarina A 
Rua JoSo Pinto, 6, conjunto 907, SC. 

• Curso BASIC, COBOL e "Micro para Exe- 
cutives", estAb sendo langados pela JR de 
Goes ComArcio e Assessoria, juntamente com 
o seminArio "Micros no lar e nos negdeios". 
InformagBes pelo telefone (021) 234-3945, 
Cx, Postal 241 1 7, CEP 20,522, RJ. 

• A IMARES estA promovendo cursos de 
"IntrodugAo ao BASIC", nas 1? e 2? semanas 
do mes de julho, com durapAo de uma semana 
e aulas das 19:00 As 22:00h, ao prego de Cr$ 
25 mil; e de "BASIC avangado" (complemen- 
tar), nas 3? e 4? semanas do mes, com dura- 
gao de duas semanas, das 9:00 As 22:00h, ao 
prego de Cr$ 55 mil. As turmas terAo no mA- 
ximo 16 alunos e as aulas prAticas sorao mi- 
nistradas nos equipamentos da loja. Maiores 
informagoes, na Rua Dr. Renato Paes de Bar- 
ros, 34, tel.: (01 1 ) 881 -0200, SP. 

• A SCREEN estA promovendo Cursos de 
ProgramagSo BASIC, COBOL, FORTRAN e 
Assembler para microcomputadores. As aulas 
serSo ministradas de segunda a sexta (manha, 
tarde e noite) e aos sAbados (manhS e tarde) 
tendo uma carga horAria de 52 hs, com 60% 
de aulas prAticas. Os interessados podem obter 
uma bolsade atA 50% de desconto. A SCREEN 
fica na Av. Eng9 Lufs Carlos Berrini, n9 991, 
Brooklin Novo, Sao Paulo. Maiores informa- 
gBes pelo tel .: (01 1 ) 531-5008, SP. 

a A SERVIMEC estA formando novas tur- 
mas para o seu curso de COBOL. A prdxima 
terA im'cio dia 22 de julho, com aulas As se- 
gundas, quartas e sextas, das 9:00 as 12:00h. 
A turma seguinte, a partir de agosto, terA au- 
las aos sAbados edomingos, das 8:00 As 13:00h. 
A Servimec formarA, tambAm, turmas para o 
curso de BASIC a ter im'cio no dia 24 de agos- 
to com aulas As segundas, quartas e sextas, das 
19:30 As 22:30h. O enderego A Rua Afonso 
Pena, 332, tel.: (011) 227-9803, SP. 



• Para informar ao leitor sobre os cursos que 
estSo sendo oferecidos, a revista recolhe in- 
formagSes em dfversas instituipBes ou as rece- 
be pelo correio. Portanto, nSo nos responsabi- 
lizamos por quaisquer alteragSes posterior- 
mente efetuadas por estas instituigSes nos 
programas ou pregos. 



CEAPRO MICROCOMPUTADORES LTDA 



CURSOS DE ESPECIRLIZACAO PR0FISSI0NAL 

• MlCROPROCESSAOORES APLICADOS A CONTROLE - 12/04/83 

TELEPROCESSAMENTO 

• TELEPROCESSAMENTO I ■ HARDWARE - 16/04/83 

• TELEPROCESSAMENTO II ■ SOFTWARE - 11/04/83 
CONVENIO SUP0RTE ENGENHARIADE SISTEMAS DIGITAIS LTOA 



INFORMAGOES AV PKESIDENTt VARGAS 590 / GR 217 - RIO OE JANEIRO ■ I EL 10211 233 5239 



7 ■v.V’il* :•! 5? 






BANANA - 85 



MiCRdCOMPUTADOR PARA DESENVOLVIMENTO DE SOFTWARE E HAROWARE 
v . _ > REVEN0E00R AUTORIZADO. .1 
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O MICRO QUE JA 
NASCEU GRANDE 



CP-300 



( ^ 
CARACTERISTICAS TFCNICAS 

• CPU com microprocesfewlm ZBOtU- ?MHz rnnmoriH principal de 48K6 

• Teclodu aHdiiurm'u ion uhti 54 lw:l*»s n funciio auto repeat reset Com piote?5o contra dciunariiKiilo 
mvolonibiio 

• Orirxrn-s |j 4 »:j TV ou ‘nori-loi rlu 16 Imhas com 64 col. 16 linhas com 32 uol. mode 

i}r afire com 48 x 128 imnlvi 

• Iriiertiiu? para gnrvador com velocipede de 600 e 1 600 Bauds. 

• Expanstirs para controlador de drives, porta paralela (impn’ssura) e porta serial R$ 232 (Modem, 
etc.) 

• Oimensoes oltliia. 7,i» cm ~ cumpr. 33.0 c:m - larg : 22,0 cm peso. 1,6 kg 

Compat ivei mil Indus os a spent os com o CP 500, inclusive no software, 
porem e cor n post o de mod u I os que pod cm ser adquinrfos de arnrdo com snas neeessidades. 

V ) 



CP-500'CP-300' CP-200 



« ft 

e ft 



m 



PROMOCAO especial 




SOFTWARE 



JOGOS: 

BATALHA AEREA 

- CP-200 (F) . 3.850,00 
CP-500 (F/D) 4.400,00* 

BATALHA NAVAL 

- CP-200 (F). 5.830,00 
FORCA 

- CP-200 (F). 4.400,00 

- CP-500 (F/D) 4.620,00* 
TIRO AO ALVO 

- CP-200 (F). 3.850,00 

- CP-500 (F/D) 4.400.00* 
BIORRITMO 

- CP-200 (F). 3.850,00 
LOTO 

- CP-200 (F). 4.180.00 
TABUADA 

- CP-200 (F). 3.850,00 

- CP-500 (F/D) 3.080,00* 
SIMULADOR DE VOO 

- CP-200 (F) . 6.600,00 
COMANDO UFO 

- CP-200 (F). 3.850,00 

- CP-500 (F/D) 4.950,00 
OESTE SELVAGEM 

CP-200 (F). 4.620,00 
SENHA 

- CP-200 (F). 4.950,00 
INVASAO C0SMICA 

- CP-200 (F ). 6.050,00 

SOMENTE P/CP-500 
PATRULHA (F/D) 

6.160,00* 
INVASORES (F/D) 

5.610,00* 

PADDLE PINBALL (F) 
Simula jogo de fiiperama 
9.600,00 
DISCOS VOADORES (F) 
Controle o canhSo para 
abate-los .... 8.000,00 



DANCING DEMOND (F / 
D) - Incri'vel demoninho 
dangarino . . 8.000.00* 
XADREZ (F/D) 

6 niveis que vSo desofid- 

lo 10.000,00* 

CUBO (F/D) 

Voce nunca resolveu o 
cubo? A solugao 6 cubo . 
6.400,00* 

JOGOS EM BASIC (F/D) 

6.400,00* 

JOGOS (F/D) COSMIC, 
SCARFMAN, LUNAR, 
BARRICADA, GALAXI, 
METEOR, PENETRE I- 
TOR-cada . 9.600,00* 

PROMOQOES 
PACOTE ECON0MICO 
(F) 

Para CP-200 NE-Z8000, 
com mu sica, damas, ga 
mSo, conta corrente e 
controle de estoque .... 

4.000,00 

10 JOGOS EM DISCO 
Para CP-500, variedade: 
boa, sky, pouso lunar, 
jornada, teaser, cupim, 
hopper, cram, fireman, 
spacefire . . . 24.000,00 

APLICATIVOS 
SOMENTE P/CP-200 (F) 
CONTAS A PAGAR 
Controla o acumulado do 
mes, ano e operates e 
poupanga . . 13.200,00 
AGENDA 

Trabalha com dois tipos 
de informagao atividade e 
telefone .... 8.800,00 



CADASTRO DE CLIENTE 
Cadastra p/cliente a razdo 
Social, rua, bairro, cid., 
est., CEP., tel,, produto 
adquirido, data da aqui- 

sigao 13.750,00 

Vl'DEO-TlTULO 
Cria titulos para vi'deo-ta- 
pes, inclusive com movi- 
mentos. , , . 16.500,00 
VU-CALC 

Destina-se a execugao de 
calculos sobre uma plani- 

Iha 10.000,00 

SOMENTE P/C P -500 
CADASTRO DE CLIEN- 
TES (D) . . . 20 ORTN 
MALA-OIRETA (D/I) 
Sistema de mala direta 
permitindo a impressao 
de etiquetas utilizando 
ou ndo chave de acesso 

40.000,00 

FINANCAS (D) 

Engloba fungcles de juros 
compostos, analise de pre- 
Co de venda e rendimen- 
tos, taxas de retorno, ta- 
bela de amortizagSo, sal- 
do hipotecario, pagamen- 
tosaprazo , 40.000,00 
PROCALC (D) 

Destina-se a execugao de 
calculos sobre uma pla- 
nilha .... 120.000.00 

VIDEO (F/D) 

Editor grafico da tela. 
Desenhe com facilidade 
no CP-500. Armazena as 
telas em fita ou diskette 
10.000.00* 



BANNER (F/D/l) 
Imprime mensagens em 
letras garrafais (80 col.) 

6.400 ,00 

SCRIPY (t) 

Completo e versatil pro- 

cessador de texto 

em fita .... 32.000,00 
em disco . . . 40.000,00 
CONTROLE DE ACOES 
(D/F) 

Para quern gosta da Bol- 
sa. Mostra os resultados 
(Lucro/Perda) 

6.400,00 

DIRETORIO (D) 

Organize e cadastra todos 
os seus programasearqui- 
vos em diskette automa- 
ticamente. Pesquisa por 
disco ou programs e po- 
de imprimir ordenada- 
mente .... 16.000,00 

BANCO DE DADOS 
(D/I) 

Sistema de fichdrio ele- 
tronico. Voce mesmo cria 
as fichase pode pesquisar 
de varios modos, 3ldm de 
permitir impressao. Simi- 
lar ao Profile 40.000,00 

CARTA ASTRAL (F/l) 
Este programs faz todos 
os calculos necessarios ao 
desenho de uma carta as- 
tral e ainda Imprime a 
mesma em questao de mi- 
nutos. So nao interpreta , 
15.000,00 



UTILITARIOS 
(SOMENTE P/CP-500) 
CONVERT (F/D) 

Converte numeros deci- 
mal e hexa. Pode ser 
chamado a qualquer ins- 
tante e ndo atrapalha o 
BASIC .... 6.400,00* 
LISTA (D/I) 

Imprime as listagens de 
progratnas em BASIC de 
forma limpa e organ iza- 
da. NSo se perca com 
LLIST .... 16.000,00 
SUPERTECLA (F) 

Cada tecla de seu CP- 
500 represents duas pala- 
vras do BASIC aldm de 
seu valor normal. Reduz 
drasticamente o tempo 
gasto na teclagem de pro- 

gramas 8.000,00 

ODONTO (F/D) 

Engloba setor financeiro, 
agenda, cadastro, mala di- 
reta, lay-out dentario . . 

50 ORTN 

EDITOR (D) 

Poderoso editor assem- 
bler para os que progra- 
mam em linguagem de 
mdqu ina. Manual c/instru- \ 

goes 32.000,00 1- 

SOUND (F/D) J- 

Pequena mas util subro- 
tina que cria uma nova 
palavra em BASIC — 
’'SOUND", lnstrug<5es 
detalhadas de como co- 
loca-la em seus progra- 
mas 6.400,00* 



F- Para CP-500/CP-300 ou CP-200 em fita. I - Requer impressora. 

D Para CP-500/CP-300 em disco. * -Acrescentar Cr$ 6.000,00 p/versao em disco 



#filcres 



Fdciet Import* pao • Reprasantapoas Ltds. 

Run Aurora. 165 - CEP 01209 - SSo Paulo - SP 
Telex 1 1 31 290 F ILG BR PBX 223-7388 - Ramai* 2, 4, 
12, 18, 19 - Oiretos 223 1446, 222 3458, 220 5794 e 
220-9113 -Reembohw- Rl? Direto 222-0016,220-7718 



NOME TEL, 

END CEP 

CID EST. EQUIP 

ENVIE AS INFORMACOES ACIMA PARA FILCRES IMP. E~ REPR. LTDA. 
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CONGRESSO DEBATE 
INFORMATICA 



Com a presenga de lideres e politi- 
cos de todos os partidos, o Simpdeio de 
Informatica do Senado Federal, realizado 
em Brasilia de 14 a 16 de junho, levou 
definitivamente o debate da Informatica 
para o Congresso Nacional. 

O grande tema durante todos os pai- 
neis foi a reserva de mercado que, ao 
final dos trabalhos, alinhou todos os par- 
tidos e entidades do setor de Informa- 
tica ao lado da politica desenvolvida pe- 
la SEI, cujas posigoes sairam bastante 
fortalecidas. Esse apoio foi tao incisivo 
que o Secretario Joubert Brizida teve 
que discordar de projeto de lei sugerido 
pela Deputada Cristina Tavares (PMDB- 
PE), lembrando que a explicitagao da re- 
sen/a de mercado em lei pode gerar 
problemas para o comercio exterior do 
Pais. 

Edson Fregni, vice-presidente da 
Abicomp, alertou ser “fundamental que 
um pais subdesenvolvido se libere do 
conceito de gap tecnoldgico, porque, 
enquanto isso nao ocorrer, sera inviavel 
a definigao de um caminho proprio” e 
propos que o conceito de reserva de 
mercado abranja apenas empresas de 
capital, mao-de-obra e tecnologia total- 
mente nacionais. 

Participaram do encontro a SEI, Abi- 
comp, APPD, Assespro, SBC, SUCESU e 
todos os partidos politicos. Os paineis 
abordaram os seguintes temas: “Politica 
Govemamental de Informatica”, “Infor- 
matizagao da Sociedade” (nesse painel 
a APPD levantou os problemas do do- 
cumento unico e da Lei 6.996/82, do 
projeto eleitoral, propondo sua urgente 
regulamentapao para evitar o perigo do 
controle social centralizado, e conside- 
rou imprescindivel a regulamentapao das 
profissoes de processamento de dados), 
“Informatica e Soberania Nacional", “In- 
dustria Nacional de Informatica", 
“O Congresso Nacional, os Partidos Po- 
liticos e a Area de Informatica’’, e “Infor- 
matica e Emprego". 

Tambem foi proposta por quase to- 
dos os presentes a formapao de uma 
Comissao Parlamentar de Informatica, 
para tornar efetiva a participagao do 
Congresso Nacional na busca de legiti- 
mapao para as decisoes do setor. 

CONSULTORIA TECNICA 

A loja Computerland de Sao Paulo 
acaba de criar o servipo de consultoria 
tecnica para o consumidor, extensivo tan- 
to a pessoas fisicas como juridicas. O 
novo departamento orienta o consumidor 
desde a definigao dos sistemas e equipa- 
mentos ate a estrutura de organizapao 
mais adequada as suas necessidades. 
A consultoria tecnica oferece os servipos 
de Organizapao e Metodos na area de 



processamento de dados; treinamento 
do pessoal do cliente; assistencia e ori- 
entapao de implantapao; desenvolvimen- 
to de aplicagoes ou sistemas; e ainda 
uma assistencia permanente ao cliente. 
O departamento de consultoria tecnica 
funciona nas lojas Computerland, com 
matriz na Av. Angelica, 1996. 

GOVERNO INCENTIVA 
EXPORTAQAO 

Visando fornecer aos empresarios de 
Informatica informapoes sobre as oportu- 
nidades de negocios detectadas no exte- 
rior, bem como as modalidades de apoio 
govemamental as exportapoes do setor, 
realizou-se dla 9 de junho, em Sao Pau- 
lo, o I Seminario sobre Promogao, Incen- 
tives e Mercados para a Exportapao do 
Setor de Informatica. Promovido pela 
Cacex, Secretaria Especial de Informati- 
ca e Ministerio das Relagoes Exteriores, 
o seminario reuniu representantes dos 
diversos fabricantes de equipamentos e 
perifericos e de fornecedores de softwa- 
re e servipos na area. 

Segundo o Secretario de Informati- 
ca, Joubert de Oliveira Brizida, os micro- 
computadores, ao contrario dos minis, ja 
tern o potencial necessario — tanto em 
tecnologia quanto em prego — para com- 
petirem no mercado externo e so nao 
tern alcangado volumes maiores de ex- 
portapao devido a grande demands exis- 
tente no mercado interno. Brizida citou a 
America Latina como o primeiro merca- 
do a ser atacado pelas empresas nacio- 
nais, seguida dos paises africanos de lin- 
gua portuguesa e do Oriente Medio. 

O presidente da Abicomp, Antonio 
Didier Vianna, concorda quanto a poten- 
cialidade dos micros e lembra outra van- 
tagem em relagao aos sistemas de maior 
porte: esses equipamentos, por sua sim- 
plicidade, nao exigem a instalagao de 
uma custosa filial no -pais importador, 
bastando credenciar um agente local pa- 
ra a representagao de vendas e presta- 
gac de assistencia tecnica. 

Didier situou as exportagoes no se- 
tor de informatica, hoje.entre 12% e 14% 
do faturamento anual da area. No ano 
passado, exemplificou, o setor vendeu 
US$ 1,8 bilhoes, dos quais cerca de 
US$ 200 milhoes provenientes de expor- 
tapoes. 

Este foi o primeiro de uma serie de 
seminarios sobre o assunto previstos pa- 
ra se realizarem no Rio de Janeiro, Porto 
Alegre, Curitiba e Belo Horizonte. 

LIVRARIA SISTEMA 

A Livraria Sistema tern novo endere- 
po: Av. Sao Luiz, 153 — loja 8, Sao Paulo, 
tels.: (011) 36-1047 e 34-2123. Em suas 
novas instalagoes, na sobreloja da Gale- 
ria Metropole, a empresa pretende am- 
pliar 0 espapo destinado a area de Infor- 
matica. 



□n 




COMPUTCHE 

Inaugurada dia 6 de maio, em Porto 
Alegre, a loja Computche que inicia suas 
atividades vendendo equipamentos da 
Unitron, Polymax, Kemitron (Naja), Digi- 
tus e Microdigital. 

Na parte de software, sao oferecidos 
os seguintes pacotes: Contabilidade Ge- 
ral; PERT/CPM; Arquivos; Mala Direta; 
Estatistica (Visiplot/Visitrend); Editor de 
Textos; Adm. de Obras; Adm. Imobiliaria; 
Visicalc; Tool Kit (tres aplicapoes: aferi- 
gao e calibragem de disk drives; edigao 
de programas; tradugao de programas 
de uma lingua para qualquer outra); Fa- 
turamento; Folha de Pagamento. Esses 
pacotes sao produzidos pela LHM — 
Software e Hardware, do Rio de Janeiro, 
a qual a loja e vinculada. 

A programagao de cursos, que inicia 
com o BASIC, incluira posteriormente 
outras linguagens. A loja conta ainda 
com pessoal especializado para orien- 
tar os clientes na escolha de maquinas e 
programas de acordo com as suas apli- 
cagoes. A Computche fica na Av. Inde- 
pendence, 599. 

JANPER USA 

A Janper Engenharia Eletronica Ltda., 
fabricante do microcomputador JP-01, 
abriu um escritorio nos Estados Unidos 
“para fins de exportagao e formagao de 
uma Trading no ramo da Informatica", 
de acordo com o presidente da empresa, 
Pedro Brandt. A Janper USA localiza-se 
em Miami, Florida, e esta sob a respon- 
sabilidade do Sr. Wladimir Watson. 

No Brasil, a Janper tem outra novida- 
de: 0 JP-01 esta sendo vendido em forma 
de kit, para montagem pelo comprador. 
Essa modalidade de comercializagao, 
alem de baratear o prego do sistema, diz 
Brandt, permite uma "maior assimilagao 
por parte de estudantes e interessados 
na area de funcionamento de hardware e 
software”. Os kits, segundo- informa a. 
Janper, tambem estao disponiveis para 
empresas que desejem montar os com- 
putadores, beneficiando-se, na revenda, 
da diferenga adicional no prego de aqui- 
sigao. 



20 



MICRO SISTEMAS, julho/83 




DANVIC LANQA DATA-ENTRY 

A Danvic, fabricante dos microcom- 
putadores DV-600 e DV-2000. esta colo- 
cando no mercado um equipamento pa- 
ra entrada de dados compativel com o 
IBM 3740: o Danvic ED, que tem 64 Kby- 
tes fixos de memoria e um disquete de 8 
polegadas. Os dados inseridos no equi- 
pamento sao transferidos em seguida 
para outro floppy com formato EBCDIC, 
utilizado pela IBM. O equipamento tem 
prego de langamento na faixa de Cr$ 2 
milhoes. Outra novidade e o sistema 
operacional DV DOS Super para o DV 
2000, compativel com o CP/M na ver- 
sao 3.0. O novo sistema pode traba- 
Ihar com mais memoria, atingindo ate 
16 partigbes de 64 Kbytes e os dados sao 
acessados diretamente na memoria e nao 
no disco. Alem disso, quando a memoria 
estiver lotada e houver necessidade de 
se chamar outro arquivo, o proprio siste- 
ma verifica qual o arquivo que foi menos 
usado ate entao e o utiliza. O novo siste- 
ma operacional permite compiiapoes 
ate 30 vezes mais rapidas. Ainda para o 
DV 2000, dentro de alguns meses estara 
aberta a possibilidade deste equipamen- 
to utilizar o processador ZB0A e seus pe- 
rifericos. Com isto o clock do DV 2000 
podera ser elevado para 8 MHz, ficando 
mais proximo dos minicomputadores. A 
nivel de prepo esta alteragao vai signifi- 
car um acrescimo de Cr$ 3 a 4 milhoes. E 
para outubro, provavelmente durante a 
realizapao da III Feira Internacional de In- 
formatics, a Danvic ja programou o lan- 
pamento do DV 600Bi, com 2 processa- 
dores: Z80A e Intel 8088. 0 DV 600Bi tera 
tambem dois sistemas operacionais: 
CP/M e CP/M86, podendo rodar progra- 
mas tanto para 8 quanto para 16 bits, e a 
memoria para usuario chegara a 256 
Kbytes. Segundo Maurice Eskinazi, dire- 
tor da Danvic, o objetivo inicial deste 
novo equipamento sera o de atingir soft- 
ware-houses que queiram desenvolver 
aplicativos para 16 bits, para depois en- 
tao vender estes aplicativos juntamente 
com o micro. 

PROLOGICA NA FILCRES 

A loja Filcres ja esta vendendo toda 
a linha de pequenos e medios compu- 
tadores da Prologica, inclusive o novo 
CP-300. La tambem podem ser encontra- 
das impressoras compativeis com estes 
equipamentos e um estoque completo 
de acessorios e suprimentos. A Filcres 
oferece ainda treinamento em operapao 
de computadores e assistencia tecnica 
para os micros. O pagamento e facilitado 
com financiamento da propria loja em 
tres vezes sem acrescimo, ou o compra- 
dor pode optar por financiamento exter- 
no para prazos mais longos ou pelo sis- 
tema de leasing. A Filcres fica na rua 
Aurora, 165, CEP 01299, Sao Paulo SP, 
tels.: (011) 223-7388 e 223-1446. 



COLOR 64 

Chegarao em breve as lojas especia- 
lizadas e magazines as primeiras unida- 
des do mais novo microcomputador bra- 
sileiro, o Color 64, fabricado pela Indus- 
tria e Comercio de Computadores Novo 
Tempo Ltda., do Rio de Janeiro. 

O Color 64, cuja produpao inicial de 
50 unldades/mes estava prevista para 
comepar a primeiro de julho, constitui- 
se, de acordo com o fabricante, num 
aperfeipoamento do TRS-80 Color norte- 
americano. O sistema de video, por exem- 
plo, foi reprojetado para funcionar den- 
tro do padrao PAL-M, e trabalha em re- 
solupao alta (matriz de 256 por 192 pon- 
tos) e baixa. com ate nove cores: verde, 
amarelo, azul, vermelho, carmin (magen- 
ta), bege. ciano, cor de abobora e preto. 

O equipamento ja vem de fabrica 
com 64 K de memoria RAM. Tem saida 
serial RS-232C e admite disquete de du- 
pla densidade e face simples. Pode fun- 
cionar como terminal de sistemas de 
grande porte ou, ainda, como terminal 
de videotexto. Na parte de software, o 
sistema dispoe de aplicativos em tres 
niveis: domestico (jogos, graficos, musi- 
cas, aplicapoes easel ras). comercial (sis- 
temas tradicionais, tais como folha de 
pagamento, controle de estoque etc.) e 
cientifico (engenharia civil e eletrica e 
matematica). 

NOVAS LOJAS EM SAO PAULO 

Sao Paulo tem quatro novas lojas de 
microcomputadores, todas olerecendo 
uma ampla variedade de equipamentos, 
perifericos, suprimentos, literatura na- 
cional e estrangeira e ate mesmo os vi- 
deogames recentemente lanpados no 
mercado nacional. 

A Chip Shop, especializada na area 
de processamento em tempo real, tem 
cursos de BASIC (basico e avanpado) e, 
futuramente, Assembler, COBOL e Pas- 
cal. Esses cursos sao ministrados na pro- 
pria loja ou em escolas e empresas mte- 
ressadas. A empresa oferece ainda um 
sistema integrado de assessoria, atraves 
do qual os seus tecnicos auxiliam o clien- 
te na escolha do equipamento, desenvol- 
vem software especifico, de acordo com 
as necessidades, elaboram a documenta- 
pao e dao treinamento. 

A Compute, alem de trabalhar com 
software de outras empresas, tambem 
desenvolve programas sob encomenda. 
A loja tem assistencia tecnica permanen- 
te para todos os equipamentos que co- 
mercializa e oferece cursos de BASIC. 

A Copec tem cursos basicos de in- 
trodupao aos microcomputadores, de 
BASIC (basico e avanpado), Assembler e 
COBOL. Na area de software, desenvolve 
programas e trabalha com produtos de 
outros fornecedores. 

A Data Solution oferece cursos de 
BASIC basico e avanpado e comercializa 



programas seus e os desenvolvidos por 
software houses, alem de uma interface 
para acoplar maquina de escrever eletri- 
ca ao micro. 

Os enderepos das novas lojas sao os 
seguintes: Chip Shop — Rua Ofelia, 248, 
tel.: (011) 211-4261 ; Compute — Rua Es- 
tados Unidos, 2141, tel.: (011) 852-8290, 
Copec — Rua Dr. Jose Ferreira de Quei- 
roz, 110, tel.: (011) 282-2618; Data Solu- 
tion — Av. Euzebio Matoso, 654, tel.: 
(011) 813-3355. 

SUPRIMENTOS INSTANTANEOS 

Os usuarios de computadores de Sao 
Paulo contam agora com dois novos ser- 
vipos de fornecimento imediato de supri- 
mentos: o S.O.S. CPD, da Vector, e o 
Supri S.O.S. , da Supridata. Ambos aten- 
dem a qualquer hora do dia, sendo que o 
Supri S.O.S funciona inclusive nos feria- 
dos e fins-de-semana. O contato com o 
S.O.S CPD pode ser feito atraves do tel.: 
(011) 815-3344 Bip 5L93. O Supri S.O.S 
atende pelos telefones (011) 543-0740/ 
542-91 17/81 5-3344 Bip 5AK7. 

PRO SOFT EM NOVO 
ENDEREQO 

A Pro Soft comunica o seu novo en- 
derepo: Rua da Quitanda, 185 — grupo 
701, CEP 20091, Rio de Janeiro — RJ, 
tel.: (021) 233-8928. Em suas novas insta- 
lapoes a empresa esta comercializando, 
alem dos pacotes tradicionais, os siste- 
mas de crediario, controle de clubes, dis- 
tribuipao de mercadorias, controle de 
almoxarifado, controle de custo de pro- 
dupao, acompanhamento e orpamento 
de obras. ativo imobilizado, analise esta- 
tistica e simulagao de ativos financeiros, 
entre outros. 

SIMPOSIO DE 
TELECOMUNICAQOES 

As Faculdades Estacio de Sa vao 
promover, de 8 a 12 de agosto, o seu 
I Simposio de Telecomunicapoes, que 
marca a formatura da primeira turma do 
Curso de Telecomunicapoes da Faculda- 
de Politecnica Estacio de Sa. Alem de 
divulgar a disponibilidade e a capacita- 
gao dos novos Tecnologos em Teleco- 
municapoes, com especializapao em Re- 
des de Dados e em Comutapao, o sim- 
posio tem como objetivo debater os se- 
guintes temas: o ensino dessas especia- 
lidades; o mercado de trabalho; o perfil 
do profissional recem-formado e suas 
atrtudes diante da tecnologia, dos equi- 
pamentos e sistemas atuais e futuros. 
O simposio, com entrada franca, sera 
realizado sempre as 19:00 hs no Audito- 
rs das Faculdades Estacio de Sa, Rua 
do Bispo, 83, bloco A, 4.° andar, Rio 
Comprido, Rio de Janeiro. 
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No comando de um bombardeiro, o pHoto recebe a missao de pousar 
num aeroporto inimigo. E s6 voc§ pode ajudfr -lo ! ! ! 



Aeroporto 83 




Renato Degiovani 



programa Aeroporto foi escrito 
para o TK82-C e para quem 

J tem pouca ou nenhuma expe- 

rienria com a digita^So de programas em 
linguagem de mdquina. Trata-se de um 
jogo onde o jogador & o co-pUoto num 
aviso bombardeiro que ird pousar num 
aeroporto inimigo. A pista en contra -se 
obstruida e o co-piloto devera bombar- 
ded-la a td que nao reste nenhum obsta- 
culo; caso contrdrio, o aviao explodira 
ao pousar. Para lansar as bombas basta 
digitar qualquer tecla. 



Os programas em Assembler sao crf- 
ticos quanto a digitaijSo. Portanto, 6 
predso muita aten^ao e seguir rigorosa- 
mente a listagem do programa. Comece 
pela listagem 1 . As linhas 1 a 7 s5o os es- 
pa£os reservados para o Assembler. Digi- 
te, em cada Bnha, tantos caracteres 
quantos estiverem indicados entre paren- 
teses (assegure-se destas quantidades, 
pois qualquer erro sera fatal). 

As linhas 130, 510 e 540 sao blocos 
de impressSo. A t^cnica utilizada aqui e 
a mesma para a linguagem de mdquina, 
com uma diferenfa: nelas iremos dese- 
nhar com o POKE. No final da listagem 
1 entre com o comando : 

PRINT PEEK 1639(6 + 256*PEEK 16397 

o resultado deverd ser 18129; caso isto 
ndo ocorra 6 porque houve erro na digi- 
tafSo. Localize o erro e teste novamente. 



Se tudo estiver correto, tede RUN 
1000 e comece a operar a entrada dos 
blocos. No final de cada bloco tede M 
para novo endere^o (ou novo bloco). Se 
houver algum erro pressioneS e re comece 
o bloco (RUN 1000 e endere 9 o). 

0 programa foi escrito em blocos pa- 
ra fadlitar a visualiza^o completa do 
mesmo. Cada bloco estd posidonado nu- 
ma linha REM: 

• Bloco 1 — Infcio e STACK do siste- 
ma. 

• Bloco 2 — Movimento do avido, radar 
e cheque de explosSes. 

• Bloco 3 — Comando da bomba e lo- 
cal de explosdo. 

• Bloco 4 — Explosfo da tone . 

• Bloco 5 — Explosdo do radar. 

• Bloco 6 — Explosao do aviao. 

• Bloco 7 — Rotina de SCROLL. 
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Comece a digita^o dos bio cos (em Agora entre com a listagem 2 e fa$a 
hexadecimal). A entrada de dados aceita tuna gravafSo do programa. Rode-o e ve- 
qualquer quantidade de bytes, por rifique se houve algum erro. Se houver 
exemplo: D1 e ENTER (NEW LINE no algum na parte em Assembler, procure 
TK82-C) ou DIAF12131A ... e ENTER. localizar o bloco em que tal erro aconte- 

Nffo de espafo entre os bytes. Quando ceu, checando todos os bytes atd encon- 

terminar, pare o programa e d<§ o co- tra-lo. Se tudo estiver em ordem, grave o 

man do RUN 2000, eliminando depois programa com RUN 900 e feliz aterris- 

as linhas 1000 a 2060. sagem... 



Blocos em Assembler 



BLOCO 1 

16514 20 06 0A BA 86 22 22 22 
16522 22 22 EC 46 02 F0 46 22 
16530 3E FF FE 00 C8 3D 16 FA 
16538 21 82 40 01 00 06 71 23 
16546 70 23 01 0A B6 71 23 71 
16554 23 70 23 AF 06 05 77 23 
16562 10 FC E5 2A 0C 40 01 71 
16570 02 09 EB El 73 23 72 23 
16578 77 23 13 13 13 13 73 23 
16566 72 23 77 2A 0E 40 2B E5 
16594 18 06 



BLOCO 2 



16981 2 A 0C 40 01 25 00 A7 ED 

16989 42 77 23 77 0E IF 09 36 

16997 04 23 36 81 C3 14 41 

BLOCO 5 

17010 El 3E 01 32 BE 40 2A 8F 

17018 40 01 41 00 A 7 ED 42 36 

17026 0A 0E 22 09 36 06 23 36 

17034 07 0E 3F 09 3E 80 77 23 

17042 36 00 23 77 23 77 AF 06 

17050 06 21 82 40 77 23 10 FC 

17058 C 3 DA 40 3A 8E 40 FE 02 

17066 28 IE 3C 32 8E 40 2A BF 

17074 40 01 41 00 A 7 ED 42 36 

17082 00 0E 22 09 36 BA 23 36 

17090 00 09 2B 36 61 C3 09 41 

1709B AF 32 BE 40 2A BF 40 01 

17106 IF 00 A7 ED 42 77 23 36 

17114 87 09 23 36 09 23 36 80 



16602 


D1 


AF 


12 


13 


1A 


3C 


FE 


77 


16610 


20 


01 


13 


1A 


FE 


00 


C2 


EB 


16618 


42 


3E 


12 


12 


D5 


CD 


92 


40 


16626 


ED 


5B 


BF 


40 


21 


82 


40 


01 


16634 


03 


00 


ED 


80 


CD 


92 


40 


3A 


16642 


8E 


40 


FE 


00 


C2 


A5 


42 


CO 


16650 


92 


40 


3A 


88 


40 


FE 


00 


C2 


16656 


IF 


42 


CD 


92 


40 


ED 


56 


BF 


16666 


40 


21 


85 


40 


01 


03 


00 


ED 


16674 


B0 


CD 


92 


40 


3A 


88 


40 


FE 


16682 


00 


20 


3C 


CD 


92 


40 


CD 


B6 


16690 


02 


EB 


21 


FF 


FF 


A7 


ED 


52 


16698 


20 


IE 


CD 


92 


40 


2A 


0C 


40 


16706 


01 


6E 


02 


09 


E0 


1A 


FE 


12 


16714 


20 


8E 


01 


00 


00 


El 


C9 


00 


16722 


00 


00 














BLOCO 3 


















16730 


3E 


01 


32 


88 


40 


D1 


D5 


21 


16730 


89 


40 


73 


23 


72 


18 


D3 


ED 


16746 


5B 


B9 


40 


AF 


12 


EB 


01 


22 


16754 


00 


09 


EB 


1A 


3C 


FE 


77 


20 


16762 


01 


13 


1A 


FE 


00 


20 


05 


3E 


16770 


IB 


12 


10 


DB 


AF 


32 


88 


40 


1677B 


1A 


FE 


BA 


26 


9E 


FE 


80 


28 


16786 


9 A 


AF 


12 


2A 


8F 


40 


E5 


A7 


16794 


ED 


52 


CA 


72 


42 


El 


23 


E5 


16802 


A7 


ED 


52 


CA 


72 


42 


El 


23 


16B10 


E5 


A7 


ED 


52 


CA 


72 


42 


El 


16818 


01 


IF 


00 


09 


A7 


ED 


52 


CA 


16826 


73 


42 


2 A 


BC 


40 


E 5 


A7 


ED 


16834 


52 


28 


28 


El 


23 


E5 


A7 


ED 


16842 


52 


28 


20 


El 


01 


20 


00 


09 


16B50 


E5 


A7 


ED 


52 


28 


15 


El 


09 


16858 


23 


A7 


ED 


52 


28 


0E 


3E 


01 


16866 


32 


88 


40 


18 


9A 








BLOCO 4 


















16877 


El 


3E 


01 


32 


8B 


40 


2A 


BC 


16885 


40 


01 


44 


00 


A7 


ED 


42 


36 


16893 


01 


23 


23 


23 


36 


87 


0E 


IF 


16901 


09 


36 


06 


0C 


09 


36 


87 


23 


16909 


23 


36 


00 


23 


36 


00 


09 


36 


16917 


60 


09 


36 


60 


23 


36 


80 


C3 


16925 


DA 


40 


3A 


8B 


40 


FE 


02 


20 


16933 


2B 


3C 


32 


BB 


40 


2A 


BC 


40 


16941 


01 


44 


00 


A7 


ED 


42 


36 


00 


16949 


23 


23 


23 


36 


00 


0E 


1C 


09 


16957 


36 


01 


23 


36 


86 


23 


23 


36 


16965 


00 


0E 


IF 


09 


36 


04 


23 


36 


16973 


00 


C3 


14 


41 


AF 


32 


BR 


40 



17122 


C3 


09 


41 












BLOCO 6 


















17131 


3A 


91 


40 


FE 


00 


20 


0C 


3C 


17139 


32 


91 


40 


3E 


92 


12 


IB 


DS 


17147 


C3 


EF 


40 


FE 


01 


20 


08 


3C 


17155 


32 


91 


40 


3E 


08 


18 


EF 


FE 


17163 


02 


20 


08 


3C 


32 


91 


40 


3E 


17171 


17 


IB 


E2 


AF 


12 


01 


FF 


FF 


17179 


C9 
















BLOCO 7 


















17186 


2A 


0C 


40 


E5 


11 


21 


00 


19 


17194 


D1 


01 


D6 


02 


ED 


B0 


C9 




BLOCO 8 


















17227 


06 


86 


00 


0A 


66 


00 


00 


8A 


17235 


8A 


8A 


8 A 


8A 


8 A 


BA 


8 A 


8 A 


17243 


8 A 


8A 


8 A 


8 A 


8 A 


8A 


BA 


8 A 


17251 


BA 


BA 


BA 


BA 


BA 


BA 


00 


00 


17259 


82 


81 


83 


81 


03 


82 


81 


80 


17267 


80 


80 


80 


80 


80 


80 


00 


80 


17275 


80 


80 


80 


80 


80 


80 


80 


80 


17283 


80 


80 


80 


80 


B 0 


80 


80 


83 


17291 


B1 


02 














BLDC0 9 


















17382 


00 


03 


03 


00 


B7 


83 


83 


00 


17390 


83 


83 


00 


00 


83 


63 


00 


87 


1739B 


83 


04 


00 


87 


83 


04 


00 


83 


17406 


83 


00 


83 


83 


04 


87 


83 


04 


17414 


85 


00 


00 


05 


05 


83 


00 


00 


17422 


05 


00 


05 


85 


00 


00 


05 


85 


17430 


00 


85 


00 


05 


00 


65 


00 


05 


17430 


00 


05 


00 


05 


00 


05 


00 


85 


17446 


85 


03 


03 


05 


85 


00 


00 


00 


17454 


07 


84 


00 


85 


00 


00 


05 


85 


17462 


03 


01 


00 


05 


00 


85 


00 


07 


17470 


84 


00 


00 


05 


00 


05 


00 


85 


17478 


02 


00 


00 


01 


02 


03 


03 


00 


17486 


01 


00 


01 


00 


03 


03 


00 


02 


17494 


00 


00 


00 


02 


03 


01 


00 


01 


17502 


00 


01 


00 


01 


00 


02 


03 


01 


BLOCO 10 


















17600 


80 


9D 


A5 


A 4 


9F 


80 


Q0 


97 


1760B 


97 


80 


B2 


AE 


A8 


B7 


B 4 


80 


17616 


88 


AE 


B8 


B9 


AA 


82 


A6 


88 


17624 


80 


97 


97 


80 


80 


B7 


A9 


60 



m 



MICRO SISTEMAS, julho/83 





AEROPORTO 83 



LEMBRETES 

— O bloco 7 e uma rotina de SCROLL 
que fun cion a melhor do que o coman do 
SCROLL do computador. Voce podera 
usd-la em qualquer programa, basta in- 
cluir a linha 7 e teclar RAND USR (en- 
derego de inicio da rotina). 



Aer oporto — Hstagem 1 



1 


REN 


1111 


(82) 


11111 


2 


REN 


111 1 


;i22) 


11111 


3 


REM 


111 ( 


141 


11111 


4 


REM 


111 ( 


127) 


mil 


5 


REM 


HI ( 


!ll5 


mu 


6 


REM 


1111 


(49) 


mu 


7 


REM 


1111 


(15) 


mil 



130 PRINT AT 10 , 30; " (90) " 

510 PRINT AT 7,0; " (192) » 

540 PRINT AT 19,0; " (96) " 
1000 SCROLL 
1010 SCROLL 

1020 PRINT "ENDERECO DO BLOCO?" 
1030 INPUT E 
1040 LET D$ = "" 

1050 SCROLL 
1060 PRINT E; " 

1070 IE PEEK 16441=1 THEN GOTO 1 
050 

10S0 IF D$=" " THEN INPUT D5 
1090 IF D8="M" THEN GOTO 1000 
1100 IF DS="S" THEN STOP 
1110 PRINT " " ; D 8 ( TO 2); 

1120 POKE E, 16*C0DE DS+CODE DS(2 
) -476 

1130 LET E=E+1 
1140 LET D8=D8(3 TO ) 

1150 GOTO 1070 
2000 FOR A=0 TO 31 
2010 POKE 17350+A , 138 
2020 POKE 17568+A ,138 
2030 POKE 17510+A , 137 
2040 POKE 17632+A,137 
2050 POKE 17293+A , 128 
2060 NEXT A 



— A lmha 200 indica a primeira linha de 
impressao do aviao. Ela pode ser altera- 
da para inidar em qualquer lugar. 

— Voce podera manipular os obstdculos 
da pista a vontade (linha 1 50), mas nao 
poderd modificar o desenho do aeropor- 
to, da torre e do radar. 

— Os niveis do jogo podem ser alterados. 



Aeroporto 



10 


SL0U 




20 


GOTO 500 




30 


FOR A=1 TO 150 




40 


NEXT A 




50 


FOR A=1 TO X 




60 


RAND USR 17186 




?e 


NEXT A 




B0 


PRINT AT 18,3; 




90 


RETURN 




100 


IF INKEYS="" THEN GOTO 


100 


110 


IF INKEY$=”M" THEN GOTO 


400 


115 

690 


IF NOT INKEY$=”I" THEN 


GOTO 


120 


CLS 




140 


FOR A=5 TO 27 




150 


LET B=INT (RND*1B+129) 




160 
B =4 


IF B = 1 34 OR B = 132 THEN 


LET 


170 


IF B-135 THEN LET B=0 




180 


PRINT AT 18 , A; C HR$ B 




190 


NEXT A 




200 


PRINT AT 1,0; 




210 


LET B=USR 16538 




220 


IF 8=0 THEN GOTO 350 




300 


PRINT AT 21 , 6> "VOCE F0I 


DES 


TRUID0. " 



310 GOTO 100 

350 PRINT AT 2 1 , 5 ; ”PA R ABENS. I/O 
CE CONSEGU IU* " 

360 GOTO 100 
400 CLS 

410 PRINT AT 4,4; "NIVEIS DE JOG 
- PRINCIPIANTE",, ,"2 
- ESPERTO" , , , , " 3 - PILOTO SUICID 
A" 

420 IF INKEY$="" THEN GOTO 420 
430 LET X=PEEK 16531 
^440 IF INKEY$="1" THEN LET X=25 



A varidvel X, na linha 470, determina a 
velocidade de desdda do aviao. 



Renato Degiovani 4 formado em Comunica- 
(So Visual e Desenho Industrial pela Pontiff- 
cia Universidade Catdlica do Rio de Janeiro. 
Hi mais de um ano utiiiza um NE-Z8000 para 
(Slcu/os em sua 4 re a de trabalho. 



Iistagem2 

450 IF INKEYS="2" THEN LET X=17 

0 

460 IF INKEY$="3" THEN LET X=15 

0 

470 POKE 16531, X 
480 GOTO 120 
500 CL5 
520 LET X=7 
530 GOSUB 30 
550 LET X=23 
560 GOSUB 30 

570 PRINT "VOCE EH 0 C0-PIL0T0 
NUn AVIAOBOMBARDEIRO.CUDA P1IS5A0 
E ATACARUM AEROPORTO INIMIG0-" 
580 LET X=6 
590 GOSUB 30 

600 PRINT "A PISTA ESTA OBSTRUI 
DA E VOCETEM QUE DESIMPED I-LA PA 
RA POUSAREM SEGURANCA- " 

610 GOSUB 30 

620 PRINT "A CADA VOLTA 0 PILOT 
0 DESCE UM NIVEL E NAO HA COMUN 
ICACAO ENTRE VOCE E ELE. " 

630 GOSUB 30 

640 PRINT "EVITE DESTRUIR POSTO 
DE RADARE TORRE DE CONTROLE." 

650 GOSUB 30 

660 PRINT "BOA SORTE ..." 

670 LET X=2 0 
680 GOSUB 30 

690 PRINT AT 4,4; "C 014 AND OS: " , , , 
,,,"! - INICIA MISSA0",,,"M - nu 
DANCA DE NIVEL",,,,, ,, "PARA LANC 
AR BOMBA PREC I ONE UNA TECLA QUA 
LQUER. ” 

700 GOTO 100 

900 SAVE "AEROPORTO" a 

910 RUN ^ 




O MELHOR SISTEMA DE CONTROLE DE ESTOQUE PARA CP-500 

- Caractensticas fTsicos dos cadastros defimdos pelo usudrio 

- Filosofia conversaciona! interativa, possibilitando fdcil operagdo 

- Consullas e atualizagces allamente dinamicas 

- Elaboragoo de Orgamentos Pedidos com opgCio de Baixa Automatica 

- Emissoo de relatonos estatTstico e administraltvos 

- Documentagao complefa 

- Adaptdvel a Micros compatives com TRS80 Modelo III 

- Prego; 60 ORTNs 



-Temos tambem outros aplicalivos. para Microcomputadores com sistema operacional CP/M 
-Admimstragao de clinicas e laboratorios, APCP. etc. 

-Desenvolvemos ainda sistemas especfficos sob encomenda. inclusive para breas 
cientlficas e grbficas 



PSI - Projetos e Servigos ©m Informatica Ltda. 

Rua Barao do Triunfo, 464 cj. 31 - Brooklm - CEP 04602 - Sdo Paulo - SP. Telex - 1122966 - Telefone. 531-9902 

— 
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UM NOVO 
CONTROLE 
NASPRMCFAIS 
EMPRESAS 






DO RAIS. 







tsi asssgE? 



Todas as empresas ai abaixo estao agora sob 
o controle doe microcomputadores AP II 
compradoe na Clappy E voce quer saber por 
orue? Primeiro: devido a sua extrema 
uexibilidade e fScil manuseio, o AP II e o 
microcomputador mais adequado para as 
neceSsidades das pequenas. medias e grandee 
empresas. 

Com memoria basica de 48 K, ele pode ser 
expandido com 384 K, adicionais. No AP n 
podem ser conectadas ate 6 unidades de disco, 
alem de plaeas para utiliza^ao de CP/M, video 
de 80 eolunas e impressoras seriais ou 
paralelas. 

Outra vantagem do AP II e que ele aceita todos 
os programas e todos os penfericos do 
microcomputador de maior sucesso nos EUA: 
o APPLE. 

Segundo: na Clappy.estas empresas 
encontraramo menor prepo e as melhores 
eondipoes de pagamento do mercado. 

Compre voce tambem um AP II na Clappy, 

Sua empresa ficara em boa companhia. 



PETROBRAS, COMPANHIA 
INTERNACIONAL DE SEGUROS, ATLANTIC 
FIORUCCI, INTERBRAS, UNIVERSIDADE 
FEDERAL DO RIO DE JANEIRO, COLEGIO 
FRANCO BRASILEIRO, PRIME DTVM 
PHOENIX SEGURADORA, ESCOLA 
AMERICANA DO RIO DE JANEIRO, COPPE 
BANCO LAR-CHASE, INCISA. POWER 
CONSTRUTORA, BANCO COMERCIO E 
ENDUSTRIA DO ESTADO DE SAO PAULO 
POESI, PANSOPHIC, MICROLAB, CLINICA 
OTORRINOS ASSOCIADOS, ICAPRESS e 
dezenas de outras empresas e profissionais 
liberals. 



umlron Oaqgpy 

Breve Clappy Copacabana. Show Room: Rua Pompeu Loureiro. 99 



Centro: Av. Rio Branco, 12 - loja e sobreloja 
283-3588. 253-3395, 253-3170. 234^0214. 234-1015. 

Rio de Janeiro - RJ 



Entregamos em todo o Brasil pelo reembolso VAHIG. 
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abado, meia-noite e uns quebrados. Esfregando os 
olhos de sono em frente ao monitor verde de um 
D-8000, contemplo o resultado de dias, ou melhor, 
noites e mais nodes de prograrnacao: um programa de plane - 
jamento de entradas e saidas para, respectivamente, matenas- 
pnmas e produtos. 

Feito para um afortunado possuidor de um micro america- 
no com disquetes, o programa resultou, entretanto, muito len- 
to e nao por culpa sua. Afinal, todo aquele volume de calcu- 
los, cerca de 900 opera goes de precisSo simples a cada altera- 
gao de um valor, era o coragao do programa, o minimo absolu- 
tamente necess^rio. 

O problema n3o estava no programa e sim no fato de se es- 
perar do micro, configurado com o padronizado BASIC inter- 
pretative, algo mais que ele (ainda) nao tem: a capacidade 
computacional de um grande computador. 

Analisemos isto com mais detalhes. Capacidade computa- 
cional (computing power) nao e um conceito facilmente quan- 
tificavel, isto e, expressavel em numeros. £ muito mais facil 
analisa-la atraves de seus parametros, como vexemos a seguir. 



BITS, VELOCIDADE E INSTRUgOES 

Vejamos o pnmerro parametro de mteresse: o numero de 
bits armazenados que sao mampulados paralelamente pelo pro- 
cessador, ou seja, o tamanho da palavra do processador. Ge- 
ralmente, quanto maior o numero de bits tratados paralela- 
mente, maior a capacidade computacional, pelo simples fato 
de nao ser necessario fracionar os entes do processamento em 
partes a serem tratadas separadamente uma apds outra. 

Vejamos por exemplo a comparagao de duas strmgs de 48 
bits (que normalmente acondicionam um mdximo de seis ca- 
racteres, ou apenas cinco, caso seja utilizado um byte como m- 
dicador de final). Num computador Burroughs 6700, cujo ta- 
manho da palavra e de 48 bits, essa operagao 6 realizada numa 
unica etapa. Um processamento equivalente num Z80, micro- 
processador muito comum em nosso meio, usado como UCP 
dos Dismac, Prologica, Microdigital, Digitus e outros, 6 feito 
atravds de um ciclo onde se carrega um byte de uma das 
strings e se compara este com o byte correspondente da outra 
string, repetindo-se este dclo ate que a pnmeira diferenga se 
mamfeste. 
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S de 16 bits 





Por outro lado, ha um limite supenor para esse parametro, 
imposto pelo fato de que a eflciencia volta a diminuir quando 
se trabalha com uma palavra maior que o ente que se deseja 
processar; se os meus dados utilizam um formato em ponto 
flutuante de 64 bits, o que fazer com os 36 bits restantes de 
um processador de 100 bits? 

Um segundo parametro de relevanda e' a veloadade do pro- 
cessador. Entendam bem que a velocidade do processador nao 
se da simplesmente em fungSo de seu clock. Um microproces- 
sador 6809 a 1 MHz pode ser tSo ou mais Tdpido que um Z80 a 
2,5 MHz. O que ocorre 6 que o numero de ciclos de clock ne- 
cessarios para se executar uma instrug£o 6 diferente para ins- 
trugOes equivalentes de ambos os processadores, de tal forma 
que o clock passa a ser determmante secundario (observem, en- 
tretanto, que para um mesmo processador o clock 6 determi- 
nante principal, como por exemplo no caso dos TRS-80 Mo- 
dels 1 e 111, ambos com UCP Z80, no qual o ultimo, apesar de 
compati'vel com o primeiro, usa um dock mais alto, obtendo 
maior rapidez no processamento). Por isso, nao se lmpressio- 
nem com especificagoes como 8, 1 0 ou 20 MHz. 

Alem disso, o mimero de clocks necessarios por instrugao 
e fungao desta tambe'm, com grande variag2o. Por isso certas 
aplicagoes sao mais rapidas em dado tipo de processador em 
relagfo a outros tipos, ao passo que com outras aplicagoes 
ocorre o in verso. 

O conjunto de mstrugoes 6 o terceiro parametro. Este 6 um 
aspecto totalmente qualitative, nao se tratando de quantas 
mstrugoes um processador tern, mas sim quais, de que tipo 
etc. Os grandes processadores, como o IBM 370, tern instru- 
gSes que lidam diretamente com vardveis em ponto flutuante, 
o que 6 uma grande vantagem em processamento cienti'fico. 
Por outro lado, mstrugoes de movimentagoes de dados que se 
auto-repetem dchcamente, como as que possui o Z80, sao van- 
tajosas em manipulagOes de textos ou de informagoes graficas. 

E o ultimo parametro 4 a capacidade de multiprocessamen- 
to, ou seja, a divisao das tarefas entre varios processadores que 
trabalham simultaneamente , coisa praticamente impossi'vel de 



ser feita pela primeira geragao de microprocessadores de 8 bits. 
Mas hoje a hist6ria e outra... 



AS “FAMfLlAS” DE 16 BITS 



E 6 justamente no hoje que se ve surgir o que se esperava 
para o amanM. Surgem nos Estados Unidos os primeiros mi- 
cros com microprocessadores de 16 bits: o da IBM, com o 
8088; o TRS-80 Model 16, com Z80 e 68000; os novos Apples 
Lisa e Mackintosh, ambos com o 68000; o da Olivetti, com o 
Z8001 ; e uma infinidade de outros. 0 que me proponho a fa- 
zer neste artigo e mostrar os coragSes (os chips) dessas novas 
maquinas. 

Existem no mercado amencano cinco principals familias 
de microprocessadores de 16 bits: 

— A f am ilia TMS9900 da Texas Instruments. E a mais antiga, 
pordm de pequena penetragao no mercado, por problemas de 
suporte funcional. Ha entretanto uma tendencia para o pro- 
gresso desta famftia, devido & entrada do TMS9995 e de cir- 
cuitos de suporte mais funcionais; 

— A famflia 8086, da famosa Intel. A verdadeira pioneira nos 
microprocessadores de 16 bits de alta capacidade, detendo por 
isso a maior parcela de equipamentos ja mstalados (em parte 
auxiliada pela esplendida aceitagSo do micro da IBM); 

— A famflia Z8000, da Zilog. Atualmente esmagada entre o 
pioneirismo da Intel e a sofisticagJo da Motorola, esta tentan- 
do reerguer-se atraves do langamento de ampla hnha de ele- 
mentos de suporte funcional; 

— A famflia 68000, da Motorola. A mais sofisticada do mer- 
cado e que tem sido a base da maioria dos novos projetos; 

— A famflia INS16000, da National Semiconductors. Mais 
recente e amda nao completamente desenvolvida, parece equi- 
parar-se e ate ultrapassar a famflia 68000. 

Vamos ver agora com mais detalhes cada uma destas fami- 
lias. 

— Texas Instruments: 

Esta famflia apareceu em 1976 como uma implementagao 
em chip da UCP da s^rie TM990 de minicomputadores. Em- 
bora muito poderosa para a e'poca, nao obteve sucesso por cau- 
sa de concepgOes equivocadas sobre o mercado que fizeram a 
Texas nao dar o apoio de hardware necess^rio ao desenvolvi- 
mento de sistemas em torno do microprocessador, coisa que 
so recente mente comegou a ser comgida. 

O TMS9995 e, na verdade, urn microcomputador-em-uma- 
pastiiha que contain, num encapsulamento de 40 pinos, os se- 
guintes elementos: 

— Clock mtemo de 6 MHz; 

— Interrupgoes vetorizadas em sete niveis; 

— Alimentagao de 5 volts; 

— 256 bytes de RAM interna; 

— Temponzador/contador de 1 6 bits. 

0 TMS9995 e r^pido e trabalha com tempos de acesso a 
maquina de 120 ns. Acoplado a um 99610 (mapeador de 
memona), ele pode enderegar ate 16 Mbytes, al^m de possuir 
estrutura interna tubular (pipelined architecture). 

— Intel; 

A famflia do 8086 surgiu atrave's dele mesmo, ha' cerca de 
tres anos, e vem crescendo desde ent£o. Hoje j 4 conta com os 
microprocessadores 8086, 8088, 80186 e 80286, al6m dos co- 
processadores 8087 e 8089, sendo que o 8086 £ oferecido em 
quatro versSes que diferem umcamente quanto ao clock ma- 
ximo aceito (a saber, 4, 5, 8 ou 10 MHz). 

Algumas caracten'sticas do 8086 sao l'mpares: 

— Sua UCP esta dividida intemamente em uma unidade de exe- 
cugao (EU) e uma unidade de interface com a barra BIU, que 
funciona assincronamente. A BIU niantdm uma fila de instru- 
gSes em eddigo-objeto de 6 bytes que ela vai atualizando quan- 
do Mo esta ocupada movimentando informagoes sob o co- 
mando da EU. A EU le as instrugoes sempre da frente da fila e . Ik 
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dessa forma, grande parte do tempo de acesso a instrug3o i eli- 
minado acelerando-se o processamento; 

— Varios de seus pinos tern dupla fungao, fundonando de for- 
ma diferente em sistemas simples e em sistemas de multiplas 
UCPs; 

— Todo o enderegamento de memoria 6 do tipo relativo-a- 
base, o que favorece o uso de programas objetos relocaveis 
(ou seja, que possam ser executados em qualquer ponto da me- 
moria sem alteragoes); 

— Possui instrugSes-prefixos que modiflcam a interpretagao 
do cddigo-objeto da instrugao seguinte. 

Vamos olhar mais a fundo este microprocessador. Ele con- 
tdm quatro registradores de uso geral de 16 bits, subdivisfveis 
em oito de 8 bits, compardveis aos sete registradores do 
8080A. Existem ainda quatro registradores de uso especifico, 
como os indexadores (in cl ui do o indicador de pilha), o conta- 
dor de programa, o registrador de status e quatro registradores 
de segmento, todos de 1 6 bits. 

Todos os enderegos de memdria sdo computados somando- 
se o enderego efetivo com 1 6 vezes o valor de um dos registra- 
dores de segmento, o que nos oferece um enderego de 20 bits 
capaz de referenciar at£ um total de 1 .048.675 bytes (1 Mbyte). 

O 8086 vem num encapsulamento de 40 pinos, necessitan- 
do de uma alimentagSo simples de 5 volts. Todos os seus pi- 
nos sao compativeis com TTL, exceto a entrada de clock, que 
e fomecida pelo integrado auxiliar 8284 de 18 pm os. Seus ti- 
clos de barra utilizam quatro dclos de clock e para utilizagSo 
de configuragOes mais complexas toma-se necessario o uso do 
controlador de barra 8288. 

0 8086 trabalha com tres tipos de interrupgdes: software, 
nao-mascaravel e mascardvel-vetorizada, atem do modo de ope- 
ragao passo-a-passo (step by step). Seu conjunto de instrugOes 
e potente e content mstrugdes de multi plicagao, divisao, tra- 
dugao e de movimentagSo repetitiva. Contudo, ele 6 limitado 
a manipulagao de palavras de 16 bits. 

A caractenstica mais interessante do 8086 6 sua capaddade 
de atuar profundamente ligado a coprocessadores. Isso por si 
s6 n3o seria nada de exceptional se os coprocessadores 8087 e 
8089 nao fossem o que s3o. 

O 8087 6 um coprocessador para cdlculos matematicos, 
sendo o drcuito integrado mais complexo em produgao co- 
mer aal, com seu custo em mais de quatro vezes o do 8086. Ele 
trabalha com oito registradores de 80 bits (!), enderegamento 
tipo pilha sobre sete formatos de dados diferentes, tres dos 
quais em ponto flutuante, tres em complemento de 2 e um 
BCD Compacto. 

O 8087 6 capaz de efetuar adigao, subtragao, multiplicagao, 
divisao, raiz quadrada, modulo, tangente, arcotangente , ex- 
ponential, logaritmo, negagSo, cdlculo de resto e comparag3o 
para todos os sete formatos com instrugoes unicas. 

Quatro regras de aproximagSo sSo utilizadas pelo 8087, de 
acordo com a programagSo (mais proximo, proximo maior, 
prdximo menor, mais pr6ximo de zero) e automaticamente 
sub-rotinas de excegSo na ocorrencia de um dos seguintes 
erros: operagao invdlida, transbordamento, divisao por zero, 
anulamento, operando n3o normalizado e resultado inexato. 
Aldm disso, conta com as constantes intemas 0, 1, PI, log2, 
log(2,10) e log(2,e). 

Fisicamente, o 8087 6 um circuito integrado de 40 pinos 
com alimentag2o simples de 5V, clock maximo de 5 MHz, sen- 
do pelo menos cem vezes mais rapido, em mddia, que sub-roti- 
nas de cdlculo utilizando as instrugoes de um 8086 a 5 MHz. 

Ja o 8089 6 um coprocessador especializado em entrada/safda 
de dados com dois canals DMA e outras caracteristicas impor- 
tantes. Nao me estenderei mais sobre ele. Sugiro a leitura da 
referenda bibliografica 1-4. 

0 8088, (c^rebro do micro da IBM, 6 praticamente um 
8086 cuja interface de dados foi afumlada para 8 bits. Suas pi- 





ivo-d-base f(jbasenidative) — Forma de enderega- 
mento onde se fixa um enderego (base) e se espetifica 
os outre s atraves de sua distitncia a base. Dessa forma, 
i mudam-se todos os enderegos 



-.RealocacSo (relocation), — OperagSo de se instalar um 




que c uma tarefa tffo mais complexa e .. passive! de erros 
l quanto maior for o mimero de enderegos a serem recal- . 

cuiados (o enderegamento re!ativo4~base e simplificador i 
* nessa situagao). X, §||gff | 

String - Varidvel alfanumdrica formada por uma codeia 
de caracteres de comprimento variavel, cujo ultimo elo 6 
: um curator especial de controle utilizado exatamente pa- 
ra indicar o fun da cadeia. 

Suporte funcional - Conjunto de circuit os auxiliares pa- 
; ra a execugSo de furigdes especificas. Exemplos: contro- 
ladores de DMA, coritroladores de disquetes. tempori- 
zadores, portas paralelas e senais etc. 

Transbordamento (overflow) - Quando o resultado de 
, uma operagao e tao grande a ponto de exceder a capati- 

dado formate. " 
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nagens sao muito pareddas e seu conjunto de instrufOes 6 exa- 
tamente o mesmo. No funcionamento, o 8088 difere principal- 
mente quanto a seu tempo de execuijao, maior que o 8086, de- 
vido a necessidade de acessar a memoria duas vezes para cada 
transference de 16 bits. Outras diferengas sao: o tamanho da 
fila de instru55es (4 bytes ao inv^s de 6), o atraso de um pulso 
na temporiza$2o do estado de parada e um dock maximo de 
5 MHz. 

Os mais novos membros da famflia sao o 80186 e o 80286. 
Este ultimo 6 superiormente compati'vel ao 8086, isto 6, con- 
tain novas instru^Oes e novas capaddades. Ele tern estrutura 
tubular e esta dividido em quatro unidades intemas, o que lhe 
dd seis vezes mais veloddade que o 8086 para um mesmo 
dock, conoorrendo igualmente para isso o fato dele possuir 
pinos separados para dados e endere^os. Aldm disso, ele possui 
intemamente os drcuitos de gerendamento e prote^ao de me- 
m6ria que, atuando sobre um espa^o fi'sico de 16 Mbytes, for- 
nece aos programadores um espago 16gico de 1 Gigabyte , apro- 
ximadamente um bilhao de bytes. 

O 80186, por sua vez, 6 tamWm superiormente compativel 
ao 8086, apresentando a nivel intemo varios drcuitos espe- 
ciais: 

— Clock intemo (8 MHz); 

— Dois temporizadores de 1 6 bits; 

— Dois canais de DMA; 

— Controlador de interrup^Oes (uma nSo-mascardvel e quatro 
mascariveis); 

— Controle de sele$5o e espera de acessos a memoria; 

— 256 bytes de memoria RAM como um bloco de controle 
dessas fun?5es auxiliares. 

Os fomecedores dessa famflia (aqui quando eu falo em for- 
necedores, nSo me refiro a revendedores, mas sim a fabricantes 
que tern a permissao da empresa criadora do microprocessador 
para fabrica-lo e comercializd-lo) sS'o, al6m da prdpria Intel, a 
Mostek Corporation, a NEC Microcomputers Inc., e a Sie- 
mens AG (Europa e Brasil). 

— Zilog: 

A famflia Z8000 e formada pelos microprocessadores 
Z8001 , Z8002, Z8003 e Z8004. Os dois ultimos modelos sao 
uma versao melhorada e ampliada dos dois pnmeiros e por isso 
trataremos aqui apenas do Z8001 e Z8002. 

Os dois sao praticamente iguais, diferindo quanto a capaci- 
dade de endere^amento de memdria. O Z8001 pode endere^ar 
diretamente 8 Mbytes, enquanto o Z8002 endere?a somente 
64 Kbytes. Dai decorrem as demais diferenpas. 

Ambos utilizam barra de dados/endere90s multiplexada, ali- 
menta9ao simples de 5 V e clock mdximo de 4, 6, 8 ou 10 
MHz. 0 Z8001 vem num encapsulamento de 48 pinos, enquan- 
to o Z8002 6 acondicionado num chip de 40 pinos. 

Uma das caracteristicas que diferenciam esta famflia da 
anterior 6 o duplo-modo de opera 9ao. Os Z8000 operam nos 
modos System e Normal. No primeiro modo todas as ins- 
tru95es estao a disposi9§o, enquanto no segundo 6 bloqueado 
o acesso a certas instances de controle de processo. Tipica- 
mente, mantem-se os programas do usudrio em modo Normal e 
o sistema operadonal em modo System. A comuta9So de um 
modo para o outro e feita atraves de mstn^Oes de chamada 
(N->S) e retomo (S->N), ou automaticamente na ocorrencia de 
certos erros, atravds de traps (armadilhas) que levam ao modo 
System. 

Os Z8000 tem 1 6 registradores de uso geral de 1 6 bits, oito 
dos quais acessdveis como 1 6 registradores de 8 bits e todos os 
1 6 concatendveis em registradores de 32 e 64 bits. O registra- 
dor RI5 6 duplo, retendo valores diferentes nos modos Sys- 
tem e Normal, pois c utilizado como um stack pointer (indi- 
cador de pilha). No Z8001, o R14 tambem 6 duplo, pois os 
endere90s completos utilizam 23 bits e demandam dois regis- 
tradores para serem armazenados (note-se que o indicador de 
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MICROPROCESSADORES DE 16 BITS 



pilha utiliza R14 para armazenar a parte superior do endere 90 ). 
Aldm disso , existem os registradores de controle e renova^So, o 
contador de programa e o apontador da ire a de status. Os qua- 
tro s3o de 16 bits no Z8002 e de 32 bits no Z8001 (exceto o 
de renovasio). 

O Z8001 utiliza segmentafSo de memdria, ou seja, com a 
ajuda de um circuito auxiliar (MMU Z8010 ou Z8015) ao inves 
de enderejar-se a memdria diretamente como um espaso linear 
de 8 Mbytes, ela 6 dividida em 128 blocos de tamanhos e posi- 
5oes"variaveis,em incrementos de 256 bytes, passiveis de se so- 
breporem pardal ou totalmente, o que facdlita a realocafao de 
programas e o intercambio de dados entre processos (Z8010) 
ou a divisio da memdria em 4096 paginas de 2048 bytes num 
arranjo de memdria virtual (Z801 5). 

Os Z8000 nfo utilizam o esquema tubular da familia 8086 
no acesso ds instru^des, empregando, entretanto, o mdtodo de 
procura antecipada: pouco antes de terminar o processamento 
de instrufOes que nao ocasionam saltos, a instrufSo seguinte 
ja 6 acessada. 

Ambos os processadores tern drcuitos de re nova 9^0 autc- 
mitica para memdrias dinamicas. 

Por razoes de estratdgia de lan^amento, os Z8000 nao con- 
seguiram firmar-se no mercado americano, mas estao tendo 
chance na Europa atravds da Olivetti, que projetou seu primei- 
to micro computador em tima do Z8001 . 

Outros fomecedores da Zilog sao a Advanced Micro Devices 
e a SGS-ATES Component! Elettronici SPA (Europa). 

— Motorola: 

A Motorola desenvolveu atd agora quatro microprocessado- 
res de 16 bits, sendo o MC68000 o principal e mais antigo de- 
les. Ele utiliza um encapsulamento dip de 64 pinos de tal for- 





ma que ndo necessita multiple xar as linhas de dados com as li- 
nhas de enderegos, ganhando assim em desempenho. 

Todos os quatro utilizam alimentafao simples de 5 V, niveis 
TTL e dock maximo de 8 ou 10 MHz (e 16 MHz no caso do 
MC68000). 

A exemplo dos Z8000, a familia Motorola 16 bits tern dois 
modos de opera^To : o Supervisor (equivalente ao System) e 0 
User (que se equivale ao Normal). Alim disso, o MC68000 
endere$a 1 6 Mbytes como um espafo contmuo. 

No seu encapsulamento de 48 pinos, o MC68000 tern barra 
de dados de 8 bits e endere^a ati 1 Mbyte de memdria. O 
MC68010, apelidado de mdquina virtual, i muito similar ao 
MC68000, tendo indusive o mesmo invdlucro de 64 pinos. Sua 
principal diferen?a i um sistema intemo de controle de falhas 
de acesso a memdria para a implanta^So de sistemas multiusua- 
rios com memdria virtual. 

O MC68020, por sua vez, tern uma barra de dados de 32 
bits e por isso vem num chip carrier (portador de pastilha), 
tendo ainda uma memdria especial intermedidria para instru- 
gdes (cachd memory), para maior agilizafSO. 

Intemamente, eles contem 17 registradores de 32 bits, sen- 
do oito Data Registers , acessiveis na forma de 8, 16 e 32 bits, 
enquanto os nove restantes sSo os A dress Registers, acessiveis 
em 1 6 ou 32 bits. Alem disso, existe o contador de programa 
(32 bits) e o registrador de status (16 bits). 

Embora os MC68000, MC68008 e MC68010 sejam assin- 
cronos, eles contem drcuitos que opcionalmente simulam um 
modo assi'ncrono para ser compativel com dispositivos perifi- 
ncos de seus predecessores 6800/6809, de 8 bits. 

Uma das caracteristicas mais impressionantes desses micro- 
processadores 6 seu modo Trace, onde eles executam as ins- 
tances uma por vez e apos cada mstrufao executam uma sub- 
rotina de teste (debug) que permite testar e corrigir programas 
em linguagem de mdquina pela verifica^o passo-a-passo do 
que estd acontecendo. O 8086 tern uma forma similar desse 
processo. 

Comparan do-os mais uma vez com os Z8000, ve-se nos 
MC68000 as exceptions (excesses) equivalentes as traps dos 
microprocessadores da Zilog, que neste caso tambem for 9 am a 
entrada em modo Supervisor quando da ocorrencia de erros. 

Duas coisas distinguem estes microprocessadores de todos 
os outros: sua Idgica de espera no acesso £ memdria e a Idgica 
de reexecusSo de ciclos de barra. Normalmente os micropro- 
cessadores necessitam que a informa93o requerida apresente-se 
em suas linhas de dados dentro de um dado intervalo de tem- 
po. Se isso n2o puder acontecer, o dispositivo deve requerer 
que o micro pro cessador prorrogue esse intervalo atd o momen- 
to em que os dados estejam disponfveis. 

No MC68000 ocorre o inverso. Ele automaticamente aguar- 
da que o dispositivo envie um sinal avisando que os dados es- 
t5o na barra. Enquanto isto nao ocorre, ele executa ciclos de 
espera. Esse sistema usa quase a mesma 16gica externa que o 
outro, mas d intrinsecamente mais seguro e facdita enorme- 
mente a interconexao de vdnos processadores e de drcuitos de 
acesso direto & memdria (DMA). 
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A outra 16gica especial i a que reexecuta ciclos de baira. 
Por exemplo, imaginemos que uma mem6ria com verificador 
de paridade, ao ser acessada oerta localidade, pega reexecugdo 
de ciclo. Nesse caso, o microprocessador repete o acesso. Se 
era um soft-error (erro esporddico) 6 bem possivel que ele de- 
saparega quando do segundo acesso. Caso contrdrio, um novo 
pedido de reexecugdb de ciclo 6 rejeitado e ocoixe uma das 
exceptions que leva a uma sub-rotina que deve corrigir o erro 
ou pedir manutengtTo. 

Por esses e outros motdvos o TRS-80 Model 16, os novos 
Apple Lisa e Mackintosh, o Concept da Corvus e outros micros 
recentes utilizam-se do microprocessador MC68000. E muitos 
outros mais vdo aparecer. 

— National Semiconductors: 

A famrtia INS16000 e' formada por tres UCPs 16008, 
16016 e 16032 e pelos coprocessadores 16081 (coprocessa- 
dor aritmdtico) 16082 (MMU). As informagoes que tenho so- 
bre esses circuitos integrados sdo poucas, mas ddo conta que as 
tres UCPs sdo similares, pordm com capacidades diferentes, 
como nas outras famjlias. 

O 16008 tern barra de dados de 8 bits, registradores de 16 
bits e executa dois sets de instrugOes: o seu prdprio e o do 
8080 . 0 16016 tern as mesmas caracterfsticas do 16008, mas 
tern barra de 16 bits. 

Jd o topo da linha, o 16032, tern barras de dados de 16 bits 
e de enderegos de 24 bits, enderegando diretamente 1 6 Mbytes 
de memoria. Ele tern oito registradores de 32 bits de uso geral 
e mais sete de uso especifico, os primeiros podendo ser mani- 
pulados como 8, 16 ou 32 bits. Acresddo do coprocessador 
16081, que tem mais oito registradores de 32 bits, para opera- 
tes em ponto flutuante , ele toma-se extremamente poderoso. 

Bom, af estao os cdrebros (ou quern sabe coragSes) da nova 
geragdo de micros de alta capacidade que estd nascendo e que 
hd de chegar ao Brasil da mesma forma que a primeira geragao 
jd nos chegou. 
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Se voce 6 programador, nao vire a pagina antes de ter este artigo. Veja como 
o micro pode ajudd-lo na definigao de mascaras de teias. 



Como automatizar sua 
programagao 



Jose Rafael Sommerfe/d 



odo programador vive tentando 
aprimorar seus programas, ge- 

ralmente no intuito de fornecer 

um determinado conforto e seguran?a 
ao usuario final. Pordm ele se esquece 
que isso implica em ter que desenhar di- 
versos lay-outs, contar posKjdo por posi- 
<jao, letra por letra... e assim ir definin- 
do seus relatdrios, teias, arquivos etc. 

Foi pensando nisso que achei uma tn- 
justi^a deixar um profissional especiali- 
zado passar horas, talvez dias,contando 
nada mais do que posi?Qes, virgulas, 
ponto e virgula e outras coisas mais. 
Questionei-me se seria verdadeira aque- 
la famosa frase Casa de ferreiro, espeto 
de pau, pois afinal o programador que 
cria a cada dia rotinas as mais mere men - 
tadas, agilizando assim uma massa de 
processamento, se utiliza de metodos 
quase sempre arcaicos para confeccio- 
nar seus programas. 

Num ato de protesto, convoco to- 
dos os programadores a se armarem de 
instrumentos para auxilia-los em suas ar- 
duas tarefas, e o meu voto vai para o 
microcomputador. 

Como prova de que nJo sou apenas 
um agitador, e sim um inovador, apre- 
sento neste artigo como eliminar, ou 
pelo menos minimizar, o grandioso tra- 
balho que envolve a definifao de masca- 
ras de teias em uma linguagem como o 
COBOL, que nos extrai toda a aten^do 
para suas minuciosas defini^Oes. Aqueles 
que jd conhecem a linguagem sabem: ao 



definir e codificar as teias de um progra- 
ma, deve-se prestar o maximo de aten- 
9 ao. Qualquer erro na contagem de uma 
ou duas posiijoes podera causar — no 
momento da execugdo do programa — 
um trauma, trust ra$Io, complexo ou 
coisa paredda no programador ao ver 
uma tela totalmente distorcida ou in- 
completa. 

A TELA DESENHADA NO VIDEO 

A experiencia a ser relatada foi de- 
senvolvida em um microcomputador 
Cobra 305, o qual se utiliza do Sistema 
Operadonal SOM e linguagem COBOL 
Interativo. Este esquema, mediante algu- 
mas alterafSes, podera funcionar em ou- 
tros micros, mesmo que operem com sis- 
temas diferentes. 

Como ja falei, acho injustos os meto- 
dos de trabalho de que se vale um pro- 
gramador. Para definigdo de teias, o pri- 
meiro passo seria pegar uma folha de 
lay-out de video e ali desenhar a tela re- 
petidas vezes, pois, afinal, difidlmente 
conseguimos desenhar a tela ideal na 
primeira vez. 

Depois de muito escreve-apaga, final- 
mente o programador teria a sua frente 
a imagem (no papel) da sua tela, com os 
campos e a mascara (ilustrafdes) ali de- 
finidas. A pr6xima etapa seria entdo a 
codifica^ao dos campos (Terminal Sec- 
tion) e da mascara (Work ing-S torage 
Section). 



Pois bem. Esque^amos a folha de lay- 
out do video. Sentemo-nos a frente do 
micro e vamos executar um programa 
que, em geral, ja vem com o sistema; um 
programa editor de textos, normalmente 
usado na digit a^So de programas-fontes. 
Alguns sSo bastante complexos e sofis- 
ticados e quanto maior for sua flexibili- 
dade, maior serd o nosso conforto na 
realiza^o desta tarefa. 

A esta altura ja cnamos um arquivo. 
“Enchendo-o” com a imagem do video 
atraves do editor, vamos desenhar ali, 
no prdpno video, a nossa defini§do de 
tela, e para tal nao predsaremos de ne- 
nhuma borracha para corre^oes, pois os 
editores geralmente permitem empurrar, 
inserir, suprimir, transportar, alterar ou 
puxar um carater, uma linha ou um 
conjunto de linhas. E e daro que com 
todos esses recursos nao ha tela que ndo 
fique, pelo menos, bem feita. 

Na figura 1 temos um exemplo de te- 
la com a definifao de sua mdscara e seus 
campos. No caso do Cobra 305, o video 
para programas em COBOL se configura 
em 20 linhas de 80 colunas. No progra- 



EMPRESA s a***************************** 1 

ENDERECO : *****»************<************ 

CEP : ***** 

C i 0 AO E : *************** 

E 5 T ADO : ** 



Figura 1 — Exemplo de uma mdscara com t 
seus campos (representados por asteriscos). 
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Nao deixe de renovar a tempo sua assinatura, para nao ficar 
nem urn dia sem sua revista mensal de micros e calculadoras 

programaveis. 

Para isto basta preencherocupom no verso, com o cheque eenvia-los 
para ATI - Analise, Teleprocessamento e Informatica Editora Ltda. 

Alameda Gabriel Monteiro da Silva, 1 .229 

■ Jardim Paulistano- Sao Paulo - SP. 

■ Cep. 01441 - Tel.: (011) 280-4144. 
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microinformatica lendo MICRO 

SISTEMAS, a primeira revista brasileira 
especializada em microcomputadores e 
calculadoras programaveis. 
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Figure 2 - Relafdo arquiw -video 



ma editor do sistema i permitido criar 
registros de at 6 80 colunas. Logo, con- 
vendonaremos o seguinte: cada tinha 
que aparecer na tela do programa serd 
igual a um registro do arquivo criado pe- 
lo editor, estabelecendo uma relagdo ar- 
quivo-video (figura 2). Para que isto seja 
feito, basta inserir uma pequena rotina 
no im'cio do programa e o arquivo sera 
carregado na memdria. 



Podemos ver na listagem um exemplo 
de rotina nas linhas 38 a 43 ; as linhas 32 
e 33 mostram a variavel que terd guar- 
dada a imagem da tela. Nas linhas 25 a 
28 temos a definifao do arquivo de tela 
(criado pelo editor). Na linha 31 vemos 
a variavel I que servird para controle do 
looping da rotina MONTA-TELA e de 
mdice para a montagem da imagem da 
tela. 



Para programas que necessitem de 
mais de uma tela, deve-se digitar a se- 
gunda a partir do 2 1 9 registro no arqui- 
vo de tela, e a terceira a partir do 419 
registro, e assim por diante, cada" tela 
ocupando 20 registros. Devemos alterar 
tamb£m o controle da rotina do progra- 
ma, criando mais espa?o para as outras 
telas na memoria Working-Storage Sec- 
tion). 

Resumindo, este mdtodo apresenta, 
entre outras, as seguintes vantagens: 

• permite alterar a mascara sem alterar 
o programa; 

• reduz o tempo gasto para o desenho 
da mascara; 

• podemos visualizar a mascara no pr6- 
prio video no momento da confec^ao; 

• reduz o mimero de linhas nos progra- 
mas-fontes; 

• possibilita listarmos o conteudo do 

arquivo de tela para e feito de documen- 
ta9ao. ■ 





Exemplo de rotina para gravaqao 




do arquivo de tela na memoria 


0001 


« • « » 








0002 


INPUT-OUTPUT SECTION. 






0003 


FILE-CONTROL. 








0004 


, , , , 








0005 


SELECT ARQTEL 


ASSIGN TO 


UL05 


-S-/ARQTEL 


0006 


, , . „ 








000 7 


DATA DIVISION. 








0008 


TERMINAL SECTION. 








0009 


TD VIDEO. 








0010 


01 TELA. 








0011 


03 FILLER 




PIC 


XI 0510) . 


0012 


03 CAMP001 




PIC 


X (0030). 


0013 


03 FILLER 




PIC 


X ( 01 30 ) . 


0014 


03 CAMP002 




PIC 


X (0030). 


0015 


03 FILLER 




PIC 


X < 01 30 > . 


0016 


03 CAMP003 




PIC 


X ( 0030 ) . 


0017 


03 FILLER 




PIC 


X < 01 30 ) . 


0018 


03 CAMP004 




PIC 


X ( 0005) . 


0019 


03 FILLER 




PIC 


X ( 0 1 5 5 ) . 


0020 


03 CAMP005 




PIC 


X(001 5). 


0021 


03 FILLER 




PIC 


X ( 0 1 4 5 > . 


0022 


03 CAMP006 




PIC 


X ( 0002 ) .. 


0023 


03 FILLER 




PIC 


X ( 0288 ) . 


0024 










0025 


FILE SECTION. 








0026 


FD ARQTEL 








0027 


LABEL RECORD 


IS OMITTED 






0028 


01 REG-TELA 




PIC 


X ( 80 ) .. 


002? 


.... 








0030 


WORKING-STORAGE SECTION. 






0031 


77 I 




PIC 


99 VALUE 1. 


0032 


01 MASCARA. 








0033 


03 MASC 




PIC 


X ( 80 ) OCCURS 20. 


0034 


, , . , 








0035 


PROCEDURE DIVISION. 






0036 


ABRE-ARQ. 








0037 


OPEN INPUT ARQTEL. 






0038 


MONTA-TELA. 








0039 


MOVE SPACE TO 


REG-TELA. 


READ 


ARQTEL AT END DISPLAY 


0040 


'ERRO NO ARQUIVO DE TELA’ GO 


TO FIM. 


0041 


MOVE REG-TELA 


TO MASC (I) ADD 1 TO I. 


0042 


IF I < 21 GO 


TO MONTA-TELA. 




0043 


CLOSE ARQTEL. 








0044 


.... 








0045 


.... 








0046 


INICIO. 








0047 


MOVE MASCARA 


TO TELA. 






0048 


, , , , 








0049 


, . . , 








0050 











Josd Rafael Sommerfeld trabalha hd trSs anos 
com programapSo de microcomputadores, uti- 
Hzando as tinguagens Assembler, BASIC, CO- 
BOL e LTD. Atualmente trabalha no 1 8AM — 
Institute Brasileiro de AdministrapSo Munici- 
pal. 



MICRO SISTEMAS, julho/83 






BIBLIOTECA DE INFORMATICA 



Orienfagao tecnica sobre Biblio- 
grafia de Informatiga para estudan- 
tes, profissionais e Executives 

I 

Fornscimento de Livros e Tratados 
cificos ou Colegoes com Srindes Tecnicos\*|||p* 

Fiimes e Slides fonados para educar 
principiantes. executivos e profissionais 
de programagao e operagao 



BOLSA DE SOFTWARE 









G 



ContaDilidade — Controle de Estoque — Con- 
tas a Receber — Contas a Pagar — Folba de 
Pagamento — Faturamento 
Pacotes para CP 500 — DGT 100 — Dismac — 

TK e Naja 

Atendimento Personaiizado para programas es- 
pecificos J 



BUREAU DE SERVIpOS 



Contabilidade e Folba de Pagamento por Com- 
putador 

Servigos desde o PLANILHAMENTO aos Relato 
rios Finats 



>m- j 

ito- I 



QU ALIDADE E R ESPON SABI LIDA DE 
A PRECOS REDUZIDOS 



rr 



Reemboiso Postal 

Formuldrios contfnuos 



be &0t* COM^RCJQ E fl55E55QRifi 

R. Conde de Bonfim, 344/406 Bloco I 
Tijuea - Rio de Janeiro - RJ 
CEP 20520- Tel.: (()2l) 2.14-3945 
Cai\a Postal 24117 — CEP 20522 
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QI-800 




O QI-800, microcoraputador de 
uso profissional fabricado pels 

Quartzil Informdtica S. A. em 

Montes Claros, Minas Gerais, trabalha 
com ate quatro disquetes de 8”, fitas 
magndticas e discos winchester de 5 ou 
10 Mb. 

Com UCP Z80A, o QI-800 tem siste- 
ma operacional compativel com CP/M e 
offerece varios pacotes aplicativos nas 
areas administrativa e comercial. 

HARDWARE 

A UCP do, QI-800 estd apoiada no 
microprocessador Z80A de 8 bits, com 
barra de endere^o de 16 bits que Ihe 
permite o acesso a 64 Kb de memoria, 
com dock de 4 MHz. 

O monitor de video que acompanha 
o sistema 6 integrado ao gabinete e pos- 
sui tela de 12”, com display de 24 li- 
nhas por 80 colunas, admitindo ainda os 
formatos 24x80, 12x40 e 12x80. Aldm 
das fun90es usiiais, o video do QI-800 
possui subdivisao programavel da tela 
em janelas emolduradas, conjuntos de 
caracteres graficos e para processamen- 
to de texto em lingua portuguesa, cur- 
sor programavel e piscante e video in ver- 
so. 

O teclado do sistema compreende 97 
teclas em padrao IBM, com teclado nu- 
mdrico reduzido, caracteres especiais e 
tedas de fun$5es. 

Sua memdria principal compOe-se de 
64 Kb RAM, sendo 56 Kb disponiveis 
para o usudrio. Como memdna auxiliar, 
o QI-800 utiliza disquetes de 8”, face e 
densidade dupla configuiando 1,2 Mb 
por disquete e comportando ate quatro 
unidades acionadoras de disquetes. 

Al£m disso, o QI-800 pode utilizar 
uma unidade de fita magndtica com ve- 
locidade de transmissao de 20 Kb/s, 
densidade de 1600 BPI e carretel de 
1200 pes, ou mesmo duas unidades de 
disco rigido winchester, de 5 ou 10 Mb 
cada. 



O interfaceamento do QI-800 permi- 
te a liga^So com impressoras matri- 
ciais de 80, 100, 160 ou 340 CPS, im- 
pressoras de linha de 300 ou 600 LPM 
e ainda impressoras margarida (daisy- 
wheel) de 45 ou 55 CPS, voltadas para 
processamento de texto. 

Um multiplexador de unpressoras per- 
mite a ligai^ao de duas impressoras no 
mesmo sistema, sendo uma margarida e 
a outra serial ou matricial. 



SOFTWARE 



O software basico do QI-800 6 com- 
posto pelo sistema operacional SO/800, 
compativel com o CP/M, que vem resi- 
dente em disco, ocupando 9 Kb de me- 
moria RAM, sendo carregado automati- 
camente atravds de uma fun 9a o boot 
strap. Atem disso, o QI-800 traz vdrios uti- 
litdrios como software de apoio que per- 
mite m copia de um ou mais arquivos, es- 
tatfstica da utiliza^ao dos discos, edi- 
tor de textos, prooedimentos cataloga- 
dos, sort/merge com ate 32 arquivos, 
dump, conversSo de disquetes para o 
formato IBM e vice-versa, e incluem ain- 



da um editor de programas e um proces- 
sador de texto. 

As linguagens de programa^So dispo- 
niveis s3o o COBOL 80 superset do 
COBOL padrao ANSI 74), o BASIC Co- 
merdal . que disp6e de tratamento de ar- 
quivos com acesso randomico e sequen- 
cial e tamanho de registro fixo e varia- 
vel, um FORTRAN comparavel ao 
FORTRAN IV e um Assembler que in- 
corpora quase todas as facilidades do 
Assembler de grandes computadores, 
sem sacrificar velocidade ou espa90 de 
memoria. 

Como aplicativos, a Quartzil oferece 
pacotes para folha de pagamento, ad- 
ministragao de clubes, e de escolas, con- 
tabilidade geral, gestao de vendas para 
comercio e industna, controle de esto- 
que, controle e gerencia de finanda- 
mentos/leasing, emissao e controle de 
a9oes, acompanhamento de custos de 
obras e outros. O software aplicativo do 
QI-800 6 desenvolvido pela softhouse 
Spress Infornrdtica Ltda,, de Belo Hori- 
zonte, empresa coligada a Quartzil. 

O enderego da Quartzil em Belo Ho- 
rizonte € Rua Ouro Preto 655, 29 an- 
dar, Belo Horizonte, MG, CEP 30000, 
tel.: (031) 335-8700. ■ 
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LUInDU lCui i 

CURSOS DE APERFEICOAMENTO TECNICOS 



NAO FIQUE SO NA TEORIA ! 

O CURSO CEDM Ihe oferece os mais completos cursos de: 

• eletrOnica digital e microprocessadores 

• ELETRONICA E AUDIO 

• PROGRAMA<pAO EM BASIC (para microcomputadores) 

E mais, voce estuda nos horarios disponlveis de acordo com o seu 
ritmo prdprio, sern afetar seu trabalho e sem gastos excessivos com via- 
gens e estadias. As apostilas siTo elaboradas especialmente para o apren- 
dizado por correspondence. Receba ainda Kits para o estudo da parte 
pratica os quais poderao fazer parte de seu prdprio laboratorio. Solici- 

informacoes e conhepa todas as vantngens que Ihe oterecemos. 



SHOP COMPUTER CEDM LTDA. 

Especializada em vendas de Microcomputadores, 
Disquetes, Programas Aplicativos, Livros e Revistas 
T6cnicas. Oferecemos ainda Assistfencia T6cnica e Cur- 
sos. Atendemos tamb6m pelo reertibolso postal. 

Av. Sao Paulo, 718 - Fone (04321 23-9674 
CEP 86.100- Londrina- PR. 



i CURSO CEDM 



Av. Sao Paulo, 718 - Fone (0432) 23-9674 
Caixa Postal, 1642 — CEP 86.100 — Londrina — PR. 

( ) curso de eletrOnica digital e microprocessadores 

( i curso de eletrOnica e audio 

( ) CURSO DE PROGRAMAQAO EM BASIC 



Nome. . . 
Enderego. 
Bairro. . . 



CEP Cidade 





Como os programas sao protegidos? Aqui estao algumas tecnicas e truques, 
e o resto... fica por conta da sua imaginaqao. 



Escondendo o jogo 
no TK82-C 



Ronaldo de Almeida Santos 



A prote$io de programas e um dos assuntos mais pole- 
rrucos entre os usuanos de computadores — cada um 

tem seu modo particular de encarar a coisa. Protegem- 

se programas contra tudo: abelhudos, curiosos, piratas, esperti- 
nhos e concorrentes. 

Mas em que pese o atual m'vel de conhecimento, nao existe 
nada atd agora que possa ser considerado 100% eficiente. Dai a 
discordancia entre os usuanos, cada um achando que o seu sis- 
tema 6 superior ao do colega. Na realidade, o que todos que- 
rem e evitar que seus programas sejam copiados. 

Existem vdrias maneiras de se proteger, ou melhor, dificul- 
tar o acesso aos nossos programas. Algumas s2o famosas, ou- 
tras nem tan to, mas o fato 6 que nada impede que algue'm crie 
um sistema de prote^So capaz de anular outro, e contra isso 
nada pode ser feito, apenas tentado. Alias, e justamente a i que 
estd o “x” da questSo, pois qualquer sistema que pretenda ser 
eficiente tem que considerar a possibilidade de ser entendido e 
anulado. 

Quando se fala em prote^o de programas, escritos em BA- 
SIC, a primeira coisa em que se pensa 6 desativar a tecla 
BREAK. Este talvez seja o modo mais errado de se abordar o 
problema, uma vez que o interpretador BASIC residente na 
ROM checa se a tecla foi pressionada no final da execugao de 
cada linha de programa. BREAK nao pode ser desativada via 
software, pelo menos a um custo baixo. 

Insistindo na tecla, um belo dia acabanamos nos encon- 
trando no interpretador do BASIC, e ai poderiamos escrever o 
programa em outro local da memona sem o teste do BREAK. 
Mas isso exigiria uma paciencia ilimitada... 

Sabemos que qualquer programa pode ser interrompido, 
correto? Pois d justamente ai que devemos usar a nossa criativi- 
dade. Com o programa interrompido e listado, o que temos a 
fazer 6 achar um meio de dificultar, ao maximo, a sua com- 
preensSo, evitando, assim, que altera^Ses sejam introduzidas. 

0 modo mais 6bvio, e no entanto um dos mais eficazes, e 
construir o programa sem espa^o entre as linhas, assim: 

1 PRINT ... 

2 LET ... 

3 IF ... 



Parece ser simples, mas qualquer altera^'o, principalmente em 
programas grandes, se toma tao complexa que desestimula as 
tentativas. 

Programas desestruturados tambdm ddo grandes dores de 
cabe<ja aos espertinhos e abelhudos. De fato,um programa po- 
de ter tantos GOTOs e GOSUBs que fique dificil entende-lo. 
O que nos pensarfamos de sub-rotinas que chamassem outras 
sub-rotinas, e estas por sua vez chamassem outras e outras e no 
final retomassem para um ponto que nao foi o de partida? Pa- 
receria extremamente complicado, mas e muito simples de ser 
feito. 

No caso dos GOSUBs, o endere$o de retomo da sub-rotina 
6 guardado no STACK do GOSUB (topo da RAM) como a pro- 
xima linha a ser executada em retomo. RETURN retira esta 
linha do STACK e passa a executar o programa a partir dela. 
Se o numero da linha que estiver no STACK for trocada, entao 
RETURN funcionara como GOTO algum lugar. 

Para achar a linha armazenada no STACK basta consultar a 
variavel ERR-SP (16386/87) + 2 e teremos o endere 90 onde 
foi guardada a primeira linha de retomo de sub-rotina. No en- 
tanto, 6 preciso um pouco de cuidado, pois cada GOSUB ar- 
mazenara uma linha, e cada numero de linha e guardado em 
dois bytes. 

Podemos checar isso rodando o programa: 



1 0 


GOSUB 100 




99 


STOP 




100 


LET A = PEE K 16386 + 256* 
PEEK 16387+2 




130 


PRINT "RET0RNA PARA A 


LINHA 


1 AO 


PRINT PEEK A+256*PEEK 


( A+1 ) 


150 


RETURN 




151 


PRINT "OKAY" 





Observe que a linha 151 nunca sera executada, ja que o pro- 
grama serd interrompido pela linha 99. No entanto, se acres- 
centarmos: 
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1 1 0 POKE A , 1 5 1 
120 POKE A+ 1 , 0 

RETURN serd desviado para a linha 151 e nSo mais para o 
ponto de origem. 

Parece comphcado, nao? Mas 6 para ser mesmo! Aqui e que 
deve entrar a nossa lmagma^ao, partindo para a elabora^o de 
desvios a base de RETURNs. Nao ha limite para o tipo de des- 
vio que podemos criar, basta um pouco de paciencia e algu- 
mas contas de somar e subtrair. 

Outro modo de confundir os curiosos sao as instrugoes flu- 
tuantes. A teoria na qual elas se baseiam 6 muito simples, po- 
rdm a sua utiliza^ao requer cuidado e um profundo conheci- 
mento sobre o programa que as estiver utilizando. 

Instrugdo flutuante e toda aquela que,numa determinada li- 
nha do programa, pode ser substituida por outra sem que a 
execuipSo do mesmo seja comprometida. Se rodarmos o pro- 
grama : 

10 SAVE "OK" 

30 GOTO 10 

ele entrara num loop de gravafao que nao tera mais fim. No 
entanto, se tivermos uma linha: 

20 POKE 16513,245 

ent£o a instru9ao SAVE sera utilizada apenas uma vez, sendo 
entao transformada numa instru9ao PRINT. Podemos flutuar 
quase to das as instn^oes, desde que respeitando a srntaxe de 
cada uma delas. 

Os numeros que constam no programa s5o tambe'm 6timos 
locals para se criar alguma confusao. Todos eles (exceto os que 
correspondent as linhas) sao armazenados com 5 bytes para o 
valor do numero mais um codigo 126 mdicativo de nvimero. A 
teona aqui e igualmente simples: apos a edi9ao da linha (por 
exemplo, LET A = 5), o valor do numero estara gravado apos a 
sua representa9So grafica. O interpretador BASIC apenas con- 
fere a sintaxe da linha e utiliza o valor gravado que vem depois 
do cbdigo 126. Deste modo, podemos trocar a representa9ao 
grdfica do numero sem alterar o seu valor. Portanto, 

10 LET A = 5 
20 PRINT A 

dara como resultado a impressao de 5. Se.no entanto, dermos 
o comando POKE 16516,30, a linha 10 sera alterada para 
LET A = 2. Ain da assim, toda vez que a linha 10 for executa- 
da, a varidvel A receberd o valor 5. 

Este recurso pode ser utilizado em todos os numeros do 
programa. Se imaginarmos que eles nSo sao aquilo que pare- 
cem ser, entao qualquer tentativa de altera93o pode fazer com 
que o curioso perca o rumo de casa. E isso ainda ndo 6 tudo. 
Se uma linha com esta altera9ao for editada (SHIFT EDIT), 
o numero passara a ter o mesmo valor de sua representa^o 
grdfica. 

DESCOBRINDO OS RECURSOS DO MONITOR 

Existem algumas maneiras da gente realmente esconder o 
jogo. Elas se baseiam na forma como o monitor faz a listagem 
das linhas dos programas. Sabemos, por exemplo, que a maior 
linha possfvel 6 a 9999. Isto implica em que o monitor nao lis- 
tara nem reconhecera as dcmais que ultrapassarem este valor. 
Podemos checar isto com o programa: 

1 CLS 

10 PRINT "ONDE ESTA ESTA LINHA?" 

20 POKE 16515,255 



Apos a execucSo, restart apenas a linha 1. Isto aconteceu 
porque a linha 10 recebeu o numero 65290. Nao significa que 
elas desapareceram ou que foram eliminadas, mas sim que elas 
nao podem ser listadas e nem mesmo acessadas. E$te recurso 
pode ser utilizado como bloco de execu9ao unica e depois ser 
colocado na moita. 

Para desfazer a mdgica basta voltar ao estado anterior com 
POKE 16515,0. Se trocdssemos a linha 50 por: 

50 POKE 16513,118 

restaria apenas, desta vez, o numero 1. Bom, o que aconteceu 
aqui foi algo bem diferente. 

Nos colocamos um c6digo 118 no lugar do CLS e, como 
ap6s o CLS original ja havia um codigo 118 indicando o final 
da linha, o monitor entendeu que ali era o fim do programa e o 
inicio do arquivo de imagens — e nSo imprimiu mais nada. A 
diferen9a para o mdtodo anterior 6 que, aqui, as linhas conti- 
nuam sendo acessadas normalmente. 

A area de varidveis do sistema tarnbem pode ser explorada. 
Algumas experiendas podem ser desastrosas, mas outras certa- 
mente ndo o serao. Vejamos: a vanavel E-PPC (16394/95) ar- 
mazena o numero da linha que contem o cursor. Por exemplo: 

20 LET A=sPEE K 1 6 3 9 4 + 2 5 6 * P E E K 1 6395 
30 PRINT "CURSOR NA LINHA 
40 PRINT A 

Este programa nos indicard em que linha esta o cursor. 
Acrescentando 10 POKE 16395,255 obteremos, como respos- 
ta, o numero 65290. Aparentemente nada aconteceu, mas se 
NEW LINE for utilizado, o monitor ficara etemamente pro- 
curando pela linha 65290. 0 mesmo, porem, ndo funciona 
com o comando LIST (o que e uma pena). 

MAIS ALGUMAS DICAS 

Como podemos constatar, ndo ha um meio realmente se- 
guro de se proteger um programa, e basta saber como a coisa 
pode ser feita que logo algudm achara um meio de desfaze-la. 

Mas ainda ha um recurso, bastante eficaz inclusive — a lm- 
guagem de mdquina. Um programa em Assembler nao passa pe- 
lo interpretador BASIC; logo, BREAK ndo sera' testado. Por- 
tanto, 6 impossi'vel (?) pard-lo. So que.nesse caso.o programa 
todo tera que ser escrito em linguagem de maquina. Mesmo as- 
sim ainda ha riscos, pois bastaria uma rotina de grava9do dife- 
rente e todo o trabalho iria por agua abaixo. 

Na pratica, a coisa pode ser um pouco diferente. Sabemos 
que o comando de grava9ao tern que cougar identificando o 
nome do programa e, a partir dai, iniciar a grava9ao da RAM. 
Ao final da grava9do, o programa continua sua execu9ao nor- 
mal. Se nos adiantdssemos ao cheque do nome e com isso in- 
troduzissemos um erro no sistema, ao final da grava9ao o sis- 
tema parana, acusando um erro qualquer. 

O comando LOAD come9a no endere90 832 e podemos 
tentar entrar na rotina em qualquer endere9o at^ 842: e so tro- 
car LOAD ” ” por RjAND USR 837 no modo FAST.(d o que 
melhor funaona). Atd hoje nao hi uma prote9do eficaz con- 
tra isso e o melhor mesmo e partir do principio de que o pro- 
grama serd interrompido. 

Esses sSo alguns conhecimentos bdsicos que o usuario de pe- 
quenos micros deve possuir, mas vale a pena lembrar que nada 
adianta um programa super protegido se ele for in util. Deve- 
mos nos preocupar sim, em produzir programas eficazes e cria- 
tivos, porque o resto... bem, o resto 6 apenas folclore. ■ 



Ronaldo de Almeida Santos 4 formado em Engenharia MecSnica pela 
FEI. Atualmente trabalha na 6rea de pesquisa e desenvotvi mento de ter- 
minals e tetri cos, sendo proprietdrio de um TK82-C hi um ano. 
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As impressoras: suas caracten'sticas e ap/icagoes e os prob/emas e pianos da industria. 



No mundo das impressoras 



D entro do elenco de penfdncos 
do computador, a impressora d 

urn dos mais solititados em ter- 

mos de trabalho e tambdm um dos mais 
caros: nos sistemas pequenos, o seu pre- 
90 nao raro ultrapassa o do proprio 
computador. Isso e parti cularmente ver- 
dade no Brasil onde, em virtude dos pre- 
90s elevados, conforme observa Antonio 
Carlos J. F. Visconti, gerente de desen- 
volvimento e introdu9ao de novos pro- 
dutos da Elgin Eletronica, “os micros 
pessoais geralmente nao sSo usados em 
casa, mas sim em pequenas e me'dias em- 
presas”. 

Com o or9amento curto e pouca ex- 
perience em Informatica, os responsa- 
veis por essas empresas — sobretudo as 
pequenas — geralmente enfrentam difi- 
culdade quando, ao sairem a procura de 
uma impressora, deparam-se com uma 
ampla vanedade de marcas e modelos e 
uma multipliddade de caracten'sticas 
expressas num jargao tdcnico que desco- 
nhecem. Surge, entSo, a pergunta: “Co- 
mo escolher?” 

DEFENCES INICIAIS 

“Antes de pensar em escolher”, acon- 
selha Marcelo Metre lies, diretor da Kris- 
tian Eletronica, do Rio de Janeiro, “o 
usuario de microcomputador, de aplica- 
95c s pessoais ou comerciais, deve estar 
bem certo de que realmente precisa de 
uma impressora. Um bom meio de saber 
isso e se questionar acerca da utiliza9ao 
que pretende dar ao sistema. se for para 
escrever muitas cartas, por exemplo, e 
claro que uma impressora d lmprescin- 




A Emilia, da Elebra 



divel. Se for, pore'm, para um relatono 
de poucas linhas, utilizado apenas pou- 
cas vezes por semana,ja deixa em duvi- 
da a necessidade do perifenco lmpres- 
sor”. 

Constatada a necessidade de se adqui- 
rir uma impressora, os parametros que 
passam a guiar a escolha sao a natureza 
da aplicagao e o volume do trabalho a 
ser executado. 

“Em muitos casos”, diz Nilson 
Giunchetti Vascon cellos, diretor da Ser- 
vimec, Sao Paulo, “a aplica9ao determi- 
na a impressora. Uma impressora de 
margarida d propria para processamento 
de textos, pois tern bastante qualidade, 
mas trabalha com velocidades bastante 
baixas. Se o usuario necessita de uma 
saida impressa para graficos tera que 
optar por uma matricial grafica. Mas o 
que geralmente define uma impres- 
sora”, prossegue Vasconcellos, “e a sua 
veloddade de impressao, para qualquer 
tipo de aplica9ao. Ou seja: nao importa 
se o usuario vai usar a sua impressora 
para controle de estoque ou folha de 
pagamento. 0 que importa d quantas 
folhas de pagamento ele tern que ter 



impressas num determinado dia e qual 0 
tempo que a impressora leva para fazer 
esse servi9o”. 

Outro fator fundamental a ser 
considerado — e que se prende direta- 
mente ao tipo de aplica9ao a ser desen- 
volvida — e o numero de colunas que a 
impressora em vista e capaz de imprimir. 
Ha dois tipos basicos de colunagem: 80 
e 132 caracteres por linha. Esses mime- 
ros podem variar para menos ou para 
mais, conforme o modelo, e ha mode- 
los que adrhitem dois ou atd varios 
formates diferentes de coluna, o que e 
conseguido pela varia9ao no espa90 
existente entre os caracteres e pela 
compressao ou alargamento desses ca- 
racteres. 

TIPOS DE IMPRESSORAS 

Neste ponto cabe recordar um 
pouco os processos de impressao atual- 
mente utilizados. As impressoras divi- 
dem-se, basicamente, em dois grandes 
tipos: de n§o-impacto e de impacto. No 
primeiro caso — no qual se incluem as 
impressoras tdrmicas, eletrostdticas, la- 
ser e de inje9ao de tinta — nao ha con- 
tato mecanico entre o elemento de 
escrita e o papel. Essas impressoras, 
alem de geralmente muito caras, sao 
muito sujeitas a problemas tdcnicos, nao 
permitem imprimir com cdpias e o papel 
que utilizam nao € barato nem tao 
facilmente encontrdvel quanto o das 
impressoras de impacto. Por esses 
motivos, as impressoras de nacnmpacto 
sao pouco populares no mercado, 
seja aqui ou em outros paises. 
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Nas impressoras de impacto, o 
mecamsmo de impressao transfere os 
caracteres para o papel atraves de uma 
fita tintada. Essas impressoras podem 
imprimir caracteres s 61 idos (um carater 
inteiro, cheio, como nas maquinas de 
escrever) ou form ados por uma matriz 
de pontos. As impressoras podem ainda 
ser lineares (imprimem a bnha inteira de 
uma s6 vez) ou seriais (imprimem 
cardter a carater, em sdrie). As im- 
pressoras lineares sao muito rapidas e 
caras, destinando-se mais a minicompu- 
tadores e sistemas de maior porte do 
que propriamente a micros. 

Nos sistemas de microcomputado- 
res, as impressoras seriais matnciais de 
impacto sao de longe as mais utilizadas. 
Digamos, portanto, que seja este o tipo 
de equipamento escolhido. Feitas as 
op^oes imciais de velocidade e largura 
de coluna (op9oes essas que devem ser 
feitas levando-se em conta futuros 
aumentos no volume de trabalho, bem 
como a diversificafao das aplica^oes, de 
modo que o modelo escolhido nao se 
tome insuficiente , pelo menos a me- 
dio prazo), ha diversos outros fatores a 
considerar. 0 conjunto de caracteres e 
as caracten'sticas a ele relacionadas 
encontram-se entre os mais importantes. 
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CONJUNTO DE CARACTERES 

Predsa-se saber, para con^ar, 
quais as fontes (tipos de caracteres) 
disponiveis e se eles se adequam d 
aplicapao em vista. Se, por exemplo, o 
objetivo e' produzir correspondence 
comerdal, a impressora deve obrigato- 
riamente oferecer caracteres maiusculos 
e minusculos, aldm da acentuapao e do 
9. Se os relatorios a fazer forem de 
natureza dentifica, os caracteres nor- 
malmente utilizados nesse setor devem 
estar disponiveis. Ja se o usudrio pred- 
sar fazer grdficos, a impressora deve 
dispor dos caracteres proprios para esse 
fim. 

Esses conjuntos de caracteres sao 
armazenados na impressora em mem6na 
ROM, sob a forma de cridigos de bits. 
Sao esses codigos que, a um comando 
do computador, ir£o defrnir as variadas 
configura9oes que as agulhas da cabe9a 
deverao formar para imprimir os diver- 
sos caracteres. A impressora pode ter 
um ou van os desses conjuntos, inter- 



cambiaveis a um comando do computa- 
dor e ha modelos dotados de memdria 
RAM para armazenar conjuntos de 
caracteres especiais programados pelo 
usuario. 

Alguns modelos permitem a densi- 
dade dupla, que consiste em fazer a 
cabe9a de impressao passar duas vezes 
pela mesma linha, modificando ligeira- 
mente o seu posicionamento na segunda 
passagem. Com isso, ela preenche os 
espa90s vazios entre um ponto e outro, 
tomando os caracteres mais densos e, 
portanto, mais legfveis. Essa caracten's- 
tica 6 bastante util para as aplica- 
9oes que exigem uma qualidade maior 
de impressao. Outros modelos aceitam a 
sobreposi9ao de caracteres, ou seja, a 
impressao de diferentes caracteres num 
mesmo lugar. Assim, toma-Se possivel 
fazer desenhos e construir simbolos 
especiais (por exemplo, batendo-se o I 
em cima do T, pode-se fazer o simbolo 
matematico PI). 

Se a apiicaijffo exigir a impressao de 
tabelas, d importante conhecer a capaci- 
dade de tabula9ao da impressora. Alguns 
modelos nao tabulam horizontal e/ou 
verticalmente , enquanto outros nao so 
tabulam como atd permitem programar 
essa tabulapao, via computador, segundo 
as necessidades especfflcas do usuario. 

INTERFACES 

0 tipo de interface^ velocidade de 
transmissao e a memoria intermediaria 
(buffer) da impressora s^o tres fatores 
que tambdm merecem toda ater^ao. 

A interface determina a compatibi- 
lidade entre a impressora e o computa- 
dor, e pode ser de dois tipos: serial ou 
paralela. Na paralela, os oito bits do 
byte sao transferidos para a impressora 
todos de uma s6 vez, atravds de oito 
Fios. Na serial, os bits s2o enviadospelo 
mesmo fio, um atras do outro. Para as 
interfaces paralelas sSri empregados os 
padroes IEEE -488 e os das empresas 
Centronics e Data Products, h'deres do 
mercado norte-americano. £ importante 
conhecer essa distin9ao porque, apesar 
de todas as interfaces paralelas funcio- 
narem do mesmo modo, a rela9ao entre 
cada fio e sua fun9ao 6 diferente. Para as 
interfaces seriais, o padrao universal- 
mente adotado d o RS- 232 -C. Tambdm 
serial, mas com sinal analogico em 
vez de digital, e' a interface de loop de 
corrente, utilizada nas teleimpressoras. 

Qual delas d a melhor? “Depende 
da aphca9ao”, explica Visconti. “As in- 
terfaces seriais foram desenvolvidas para 
aplica9oes a distancia. Elas podem traba- 
lhar at d 50/60 metros de distancia do 
micro, sem modems, e a quilometros, 
com modems. Sua caracteristica desfa- 
voravel € a velocidade : elas sao mais len- 
tas que as.saidas paralelas que, no entan- 
to, tern que trabalhar sempre perto do 
micro”. 




Stratus 310 

A velocidade de transmissao, ex- 
pressa em bauds ou em bits por segundo 
— bps — representa a rapidez com que 
os bits de dados ou coman dos sao trans- 
feridos do computador para a impresso- 
ra. 

Obuffer tern a seguinte utilidade: 
como o computador 6 geralmente mais 
rdpido que a impressora, ele tern que fi- 
car esperando que ela fique desocupada 
para enviar-Lhe mais dados. Com o buf- 
fer, ele envia uma certa quantidade de 
bits que ficam armazenados nessa me- 
mriria intermediaria. Enquanto a impres- 
sora descarrega no papel o conteudo 
dessa memoria, o computador fica livre 
para prosseguir na execu9ao do progra- 
ma, e so serd interrompido outra vez 
quando, Fmda a impressao do que esti- 
ver no buffer, a impressora solicitar mais 
dados. Quanto maior a capacidade do 
buffer, menor a frequencia dessas in- 
terrup96es e, por extensao, melhor o de- 
sempenho geral do sistema. 

O papel, encontrado nas lojas de 
micros ou em firmas especiahzadas em 
suprimentos para Informatica, pode ser 
basicamente de tres tipos: formulario 
continuo, rolo ou folhas soltas. Nem to- 
das as impressoras aceitam esses tres ti- 
pos de papel, e ha larguras diferentes, 
tambem. Portanto, d bom observar es- 
ses detalhes. O numero de cdpias que o 
equipamento pode imprimir simultanea- 
mente tambem 6 importante porque em 
certas aplica9oes, como a emissao de 
notas fiscais e faturas, 6 preciso tirar va- 
rias vias. 

Outro fator tSo importante quanto 
as caracten'sticas tdcnicas do equipa- 
mento e o grau de confiabilidade que 
ele oferece. Conforme lembra Visconti, 
“os perifdricos tern tempo de vida me- 
rior que as UCPs, pois sao elejrome cam- 
eos. Uma impressora serial, por exem- 
plo, pode fundonar atd 500 horas sem 
assistenda tecnica. Uma UCP fundona 
mais de 2 mil”. Assim sendo, prosse- 
gue, “d necessario saber se a impressora 
oferece confiabilidade, ou seja: qual o 
seu tempo de fundonamento sem as- 
sistenda tecnica? Qual o seu tempo 
real de utiliza9So e n5o-utiliza9ao (quan- 
to tempo ela tern que ficar desligada)? 
Qual o seu tempo de vida? O fabricante 
ou distribuidor oferecem assistenda 
tdcnica?” 
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Para quem nao tem grande volume 
de trabalho, ha ainda a opijao de utilizar 
uma maquina de escrever eletrica liga- 
da ao micro atraves de interface especi- 
al. Apesar da baixa veloridade (cerca de 
15 CPS), a qualidade de impressSo 6 
murto boa e ja existem alguns modelos 
dispom'veis no mercado brasileiro. Essa 
alternativa, contudo, € mais interessante 
para quem jd dispoe da maquina de es- 
crever, pois a compra simultanea dos. 
dois equipamentos (maquina e interfa- 
ce) pode ultrapassar o valor de uma im- 
pressora. 

RESPALDO TfiCNICO 

O usuario precisa ter respostas para 
todas essas duvidas antes de se decidir 
por um modelo (e atd mesmo para esco- 
lher o lugar onde ira realizar a compra). 



Para isso “ele precisa de um respaldo 
t^cnico”, diz Vasconceilos. “Ele deve re- 
correr a pessoas da area e empresas es- 
pecializadas”. E nessas firmas, conforme 
ressalta Meirelles, “deve exigir o maxi- 
mo do revendedor em rela^ao 4 s carac* 
terfsticas e prefos”. 

O tratamento que se dara 4 impres- 
sora apos a compra tambdm ira influir 
no seu desempenho. Ao respeitar sem- 
pre as recomenda^oes do fabncante no 
que tange a umidade, poeira, variafoes 
da rede eletrica e condi^Qes gerais de 
opera^ao, bem como nao ultrapassar os 
prazos de manuten$ao preventiva, o 
usuano estara garantindo um bom fun- 
cionamento da maquina e, consequente- 
mente, menos gastos com ela. 

Publicamos a seguir uma lista das 
principal impressoras para microcom- 
putadores dispomveis no Pafs, suas ca- 



racteri'sticas e preijos. Especificamente 
quanto aos prefos, 6 bom frisar que eles 
estao sujeitos a varia9des devido 4 infla- 
fao, desvalorizaijges do cruzeiro (que in- 
cidem sobre o custo dos componentes 
importados) e outros fatores. E como o 
leitor poderd constatar na tabela, nem 
to dos os fabricantes gostam de divulgar 
os pre^os dos seus produtos. 



0 que pensam (e fazem) os fabricantes 



mercado de microcomputado- 
res i bastante promissor. Nesse 
ponto concordam quatro dos 
maiores fabricantes brasileiros de im- 
pressoras ouvidos por MICRO SISTE- 
MAS. O impacto da microinformatica 
na indiistria de impressoras tambdm nSo 6 
coisa do futuro: Elebra, Elgin, Globus e 
Scritta, que antes s6 vendiam em OEM 
para os grandes fabricantes de UCPs, 
voltam-se agora para o circuito das lo- 
jas, onde estSo os compra dores de mi- 
cros. Os modelos destinados a esse 
segmento estao recebendo aperfeifoa- 
mentos e ja se registrant atd novos lan- 
9amentos. 

Se todos os fabricantes estao sendo 
benefidados pelo ripido crescimento do 
mercado, jjuntos enfrentam tambem al- 
gumas dificuldades. A comc^ar pelas 
ainda pequenas dimensOes do mercado: 
a baixa escala de produfdo daf conse- 
quente toma diffcil tanto reduzir o pre- 
50 do produto final quanto retarda 0 
processo de nadonaliza^ao, uma vez que 
a fabricatjao local de certos componen- 
tes s6 se toma economicamente viavel 
quando produzidos em grandes quanti- 
dades. 

O aumento do in dice de nacionaliza- 
95o tambdm e prejudicado por falhas na 
estrutura tarifaria de importa9do vigente 
que em muitos casos cobra mais impos- 
tos de quem importa menos, e vice-versa. 
E para complicar, a industria enfrenta 
ainda a concorrenda de alguns grandes 
fabricantes de computadores, que verti- 
calizam a sua produto, e a competigao 
ilegal dos contrabandistas de computa- 
dores e perifbricos, que Ihe rouba pre- 
dosos clientes. 



“O contrabando continua introdu- 
zindo no pais uma grande quantidade de 
equipamentos e perifericos”, diz Isu 
Fang, Presidente da Elebra. “£ impor- 
tante alertar o usuario que se ele compra 
um penf6rico contrabandeado por um 
pre90 bastante acessivel (isento de im- 
postos e encargos sodais), ele nao terd 
a prote9So do fabncante com rela9So a 
manuten9ao, assistenda tecnica e garan- 
tia”, lembra Fang. 

Na opinido de Fernando Suarez, Di- 
retor de Marketing da Globus Digital, 
“o linico caminho” para combater 0 
contrabando 6 “fazer um produto su- 
fidentemente barato que tome essa 
‘importa9ao’ inviavel”. 

Ironicamente , o caminho para evitar 
a importaySo, seja a de que modalidade 
for, conduz obrigatoriamente a expor- 
ta9ao, pois s6 ela pode oferecer a esca- 
la de produ9So necessdria tanto para re- 
duzir os pre9os dos produtos para o con- 
sumidor, quanto para viabilizar a pro- 
du9do local de componentes como cabe- 
9as de agulha, motores de passo e dr- 
cuitos integrados. 

Outra possibilidade para que a in- 
dustna de perifencos fature alguns d6- 
lares para o Pafs, aponta Suarez, 6 a fa- 
bricate em regime de draw-back, no 
qual importam-se os componentes, faz- 
se a montagem aqui e exporta-se o pro- 
duto acabado. Essa prritica, explica Sua- 
rez, n 5 o onera a balan9a de pagamentos 
do Pafs, gera empregos e proporciona 
uma boa competitividade no mercado 
intemacional devido ao baixo custo da 
mao-de-obra no Brasil. 

Os fabricantes, alids, est<To preocupa- 
dos em aumentar o mais rdpido possf- 



vel a nacionaliza^o dos seus produtos. 

A Elebra, por exemplo, atd o final deste 
ano jd devera estar fazendo as suas pr6- 
prias cabe9as de agulhas, o que elevara 
para 80 % o fndice de nacionaliza^o de 
suas impressoras. A Scritta, segundo o 
Vice-Diretor Edmundo Panzoldo Teixei- 
ra, j i investiu Cr$ 1 50 milhbes no setor 
de mecanica fina e de precisao,e espera 
dentro de 18 meses estar produzindo os 
componentes que ainda importa (cabe- 
9as de agulhas e motores de passo), que 
equivalem a 15 % do produto. A Elgin, 
premida pelos efeitos da maxidesvalori- 
za9ao do cruzeiro, acelerou o seu pro- 
grama de produ9ao nadonal de com- 
ponentes mecanicos e, para isso, conta 
com uma boa retaguarda: as divisOes in- 
dustrials da Elgm Maquinas S. A., d 
qual pertence. De acordo com Jos£ Car- 
los Capeto, Gerente de Marketing, a 
medida permitiu evitar 0 repasse para o 
consumidor dos aumentosnos pre90s de 
vdrios componentes importados. As im- 
pressoras da Elgin atingem hoje a faixa 
de 47 % de nacionalizafSo. A Globus, 
por sua vez, espera a sua produto atin- 
gir uma escala que justifique a produ9ao 
interna de cabe9as de agulhas. Esse mo- 
men to parece nSo estar muito longe, 
principalmente agora que, conforme re- 
vela Suarez, a empresa comega a expor- 
tar impressoras matriciais para os Esta- 
dos Unidos, venda essa que em breve de- 
vera atingir a dfra das 500 urudades por 
mes. 

O esfor9o de nadonaliza9So — exigi- 
do pela SEI para a aprova^o dos proje- 
tos de fabrica9So — tem sido, no entan- 
to, pardalmente prejudicado pela atual M 
estrutura tarifaria, ditada pelo Conselho m 
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nkroScopus, 

o computador 
bem acompanhado. 



Na hora de decidir-se por 
um microcomputador, diversas 
caracteristicas sao sempre 
analisadas: memoria, sistemas de 
aplicagao, utilitarios, 
possibilidades de expan sao, etc. 

Mas isso n5o basta para 
garantir um bom investimento. 

E preciso avaliar cuidadosamente se 
o fornecedor tern uma estrutura 
capaz de oferecer uma assistencia 
adequada ao cliente. 

Todo profissional, ao analisar 
o microcomputador 
da Scopus, 
observa 
que as 

caracteristicas 
tecnicas 
do produto 
atendem as 
suas expectativas. 
Alem disso, 
o Microscopus vem acompanhado de 
varios servigos que a Scopus 
oferece aos seus clientes. 

Mesmo antes de optar por um 
equipamento, o usuario ja pode 
contar com a assistencia da Scopus. 

Nessa primeira fase, ele 
recebe uma autentica consultoria na 
sua area de interesse, feita por 




engenheiros e analistas experientes 
em tefeprocessamento, aplicagSes 
comerciais e administrativas. Como 
resultado', a implantagao e a 
operagao de um sistema Scopus 
nao Ihe causarao problemas, pois 
os analistas de suporte continuarao 
o planejamento desenhado 
na primeira fase. 
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Mais do 
que isso, 
para que 
o usuario do 
Microscopus 
elimine 
suas duvidas 
com maior 
rapidez, 
a Scopus 
mantem uma linha direta com os 
analistas de desenvolvimento e 
suporte: o servigo Disque Sistema. 
Atraves de um simples contato 
telefonico, os clientes que 
desenvolvem seus proprios programas 
ou os que usam os sistemas de 
aplicagao Scopus podem obter uma 
consultoria sobre qualquer aspecto 
relacionado a operagao do 
Microscopus e seus sistemas. 

A Scopus oferece tambem um 
servigo de treinamento, realizado 




atraves de 
cursos, 
que atendem 
as varias 
necessidades 
do cliente: 
da operagao 
do Microscopus 
ate a sua programagao 
em linguagens de alto nivel. 

Complementando esses servigos, 
o usuario tern & sua disposigao uma 
completa documentagao tecnica sobre 
os mais diversos aspectos do 
equipamento e seus sistemas. 

E para manter o Microscopus em 
permanente disponibilidade, o usuario 
dispoe de uma 
linha direta 

COVO coma 

Q 



sco pus 

i (MV 

I ASSIST 



assistencia 
tecnica 
Scopus, 
capacitada 
a atender 
prontamente 
o seu chamado. 

Toda essa estrutura montada pela 
Scopus tern um objetivo claro: oferecer 
um microcomputador sempre bem 
acompanhado de solugoes completas 
e continuas aos seus clientes. 
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de Poh'tica Aduaneira. De acordo com 
Fernando Suarez, o problema deve-se a 
insuficientia no detalhamento de diver- 
sos produtos, juntamente com o valor 
das alfquotas atribuidas a cada um de- 
les. Assim, explica Suarez, para se im- 
portar um determinado subconjunto pa- 
ga-se, por exemplo, 30%. Caso se queira 
trazer esse mesmo subconjunto desmon- 
tado com alguns componentes a menos 
para adidonar componentes similares jri 
fabricados no Pats, ocorre o seguinte: 
a cada um desses componentes importa- 
dos seri adicionada uma aljquota espe- 
cifica e a soma dessas diferentes aliquo- 
tas acaba ultrapassando o valor que se 
iria pagar pelo subconjunto pronto. Des- 
sa forma, trout as vezes sai rnais barato 
comprar o produto acabado do que tra- 
zer apenas parte dele para agregar-lhe 
componentes e mao-de-obra nationals. 

TECNOLOGIA E FABRICA^AO 

Edmundo Teixeira d de opiniio que 
“no Brasil ji existe capaddade tecnold- 
gica, tanto em mecanica flna como de 
predsao, criada em geral pelos pr6prios 
fabricantes ou por microempresas a eles 
vinculadas. Isso acontece”, prossegue, 
“porque, em geral, a maioria dos forne- 
cedores de componentes ja estabeleddos 



no mercado se nega a fomecer compo- 
nentes em pequena escala para uma em- 
presa nova que ainda nao tern grande es- 
cala de produto”. Para Teixeira, a falta 
de recursos humanos com experienda 
no setor d outro problema critico rela- 
tivo a nacionalizagao dos produtos. Josd 
Carlos Capeto, con cor da e diz que isso d 
principalmente verdade no desenvolvi- 
mento de impressoras, “que sio produ- 
tos bem compiexos em termos de enge- 
nharia, ji que unem precis 5es mecani- 
cas com predsQes eletronicas”. Fernan- 
do Suarez, no entanto, nao ve tao pro- 
blematica a questao dos recursos huma- 
nos: “Temos capaddade. O que falta d 
dar mais apoio is Universidades no de- 
senvolvimento de novos produtos, acre- 
ditar que eles sao capazes”. Quanto aos 
fomecedores, ele tambdm acha que a pe- 
quena escala de encomendas d uma difi- 
culdade e diz que d preciso que essas 
empresas se acostumem “a ter um con- 
trole de qualidade” compativel com as 
exigencias da industria. 

Ja a Elebra, que pertence a poderosa 
Cia. Docas de Santos, n5o se queixa dos 
seus 50 fomecedores, de quern compra 
desde plasticos ate drcuitos integrados. 
Isu Fang, acredita que a tecnologia na- 
cional tern um nivel bastante satisfato- 
rio, mas faz questio de salientar: “e 



preciso manter a reserva de mercado pa- 
ra as empresas nadonais, pois s6 com o 
apoio do mercado national d que essas 
empresas poderao operar, desenvolver-se 
e desenvolver tecnologia”. 

“O setor de microinformatica, em 
termos de volume, representa hoje um 
potential enorme”, diz Suarez, acres- 
centando que esse mercado s6 tende a 
crescer i medida em que novos usuirios 
forem aderindo i Informatica, sobre- 
tudo empresas (“toda empresa tern con- 
digGes de ter um micro”), escolas (cita 
o exemplo dos Estados Unidos) e os que 
usam sistemas ligados a bancos de dados 
(“onde se consulta praticamente tudo”). 

Todos os fabricantes de impressoras 
reconhecem a importancia da micro- 
mformitica e, em vista disso, estao 
orientando suas industrias para atender 
a esse mercado. Um claro exemplo disso 
sao as transformagQes por que passaram 
as suas estruturas de comertializagao, 
antes voltadas exclusivamente para o 
mercado OEM, e agora abertas tamb^m 
para os distnbuidores de varejo. Essa 
abertura para as lojas implica numa se- 
ne de modificagQes no funcionamento 
da empresa, desde a responsabilidade di- 
reta pela manutengao dos equipamentos 
— antes atnbuigao dos integradores de 
sistemas — ate a necessidade de format 
estoques, posto que as lojas nio tern, ge- 
ral mepte, capital de giro suficiente para 
comprar muitas unidades de uma vez, 
mas, ao mesmo tempo, pretisam ter 
uma resposta ripida quando fazem um 
pedido de equipamento. 

As impressoras seriais, printipalmen- 
te as de velocidade ate 200 CPS, sao as 
mais procuradas nesse mercado em que 
um dos fatores que mais pesa 6 o prego. 
Os fabricantes estao atentos a esses de- 
talhes e ja preparam a sua estrategia pa- 
ra ataca-lo. A Elgm, por exemplo, esti 
langando a Elgin Lady, impressora de 
matriz 9x7, 100 CPS e adaptavel prati- 
camente a qualquer microcomputador. 
A Elebra esti aperfeigoando a sua ja 
famosa Emilia, enquanto que a Globus 
enfatiza a sua linha de impressoras ma- 
tritiais. E todos os quatro modelos que a 
Scritta produz sio para uso em micro- 
computadores. 

Quanto aos pregos, todos concordam 
que deverao cair a medida em que au- 
mentar a produgao e Isu Fang faz uma 
previsao: a longo prazo, a expansio do 
mercado fari com que o usuario se tor- 
ne cada vez mais exigente em termos de 
qualidade. Ou seja, cada vez mats ele 
exigiri um produto que requeira o mi- 
nimo de re paros e tenha um maior tem- 
po de vida. 



Tex to final: Ricardo Inojosa 
ApurafSo SP: Beatrix Carolina Gonpaivas a 
Stela Lachtarmachar 



Nao pare seu programa 
nem perca a memoria 

GERATRO 

Gerador Ele^^HDO Portatil de 200 VA 







GUARDIAN 

Equipamentos Eletrdnicos Ltda. 



O Gerador Eietromco GERA IRON 
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a problema tie frilha na rndn 
eletnuA Quamio e:>ta taitjr 
GERATRON continuer ••.I alimerMndo 
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houvesibe ai..omet:n.io Gharm' 
um mprosemomt-' hoje mesmo 
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TotalWare 















1/0 IY1 nc pvnlirp r Total Ware 6 ao mesmo tempo hardware e software, 
w ca I I I wa^i I I/O I . equipamento e oportunidade, servico e conf iabilidade, 

programa e consulta, atendimento e novos produtos, enfim, um componente novo e indispensavel 
para o seu microcomputador. 

TotalWare 6 uma exclusividade CompuShop, a loja especializada em microcomputadores 
onde voc6 encontra software, perifericos, acessbrios, a mais completa linha de livros e revistas 
nacionais e importados bem como diskettes e formul&rios. albm ae cursos e assistencia 
tbcnica permanente. Tudo a pregos especialmente programados. 

Na CompuShop a preocupagao b fazer com que voce tenha 
o microcomputador certo, de acordo com as suas necessidades. 

Mas a penas isso n&o basta. Foi por isso que a CompuShop 
criou toda uma infra-estrutura de apoio. I f MY1I 

F“oi por isso que criou TotalWare. i i| 

Rua Dr. Mario Ferraz, 37 - CEP 01453 - SAo Paulo • SP - Tels. : (Oil) 210-0187 / 212-9004 - TELEX: (Oil) 30611 BYTE BR 

Aberta de Segunda 0 Sexta das 9 As 19 horas e aos SAbados das 9 As 14 horas 
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Estoque suas mercadorias e fique tranquilo... O micro avisard quando algum item estiver em baixa. 



Controle de estoque 
no PC-1500 



Newton Braga Junior 



om capacidade para armazenar 
atd 200 itens, com seus respec- 

1 twos pre^os e quantidade, po- 

dendo cada um deles ter atd dez caractc- 
res, o programa Controle de Estoque foi 
desen volvido no micro PC- 1500 (Pocket 
Computer) da Sharp, mas tamWm pode 
ser exccutado no WT-2 da Radio Shack 
(que 6 o prdpno PC-1500, s 6 que com 
outro nome) e necessita um mfrurno de 
4K RAM para ser rodado. 

Uma caracterfstica mteressante deste 
programa 6 que um smal sonoro, de aler- 
ta, serd sempre enutido em situates es- 
peciais, tais como apagar a mem 6 na,in- 
troduzir registro, item de baixa, venda 
unpossivel.etc. 

Vamos ver, entdo, as sete funfOes 
que determinam este programa: 

A — Apaga a membna e se prepara para 
uma nova tabela ; 

C - Consulta ao arquivo. Esta consulta 
pode forneccr resultados na impressora 
(opcional) ou no video. No pnmeiro ca- 
so, o item em baixa (quantidade < 2 ) 6 
impresso cm vermelho; 

D — Apaga registro (apaga item do ar- 
quivo); 

L — Lista todo o arquivo (tabela). O 
item em baixa tamWm aparece em ver- 
melho; 

M — Modifica registro. Em pnmeiro lu- 
gar e uitroduzido o nome do item em 
referenda. Se voce n9o deseja modificar 
o para metro de um determinado item, 
pressione ENTER, sem qualquer intro- 
duflo; 

S — Esta opfdo permite ler ou gravar o 
arquivo no casscte; 



V - Manuten^So do arquivo (venda efe- 
tuada): se for feita uma venda, a fun 920 

V deve ser executada, para dar baixa no 
estoque; se este n3o for suficiente para a 
venda (estoque nienor do que a quanti- 
dade vendida), a baixa do estoque nSo 4 
efetuada; e se com a venda, o estoque 
do item cair para menor ou igual a 2 , se- 
rd enutido um smal sonoro; 

X — Coloca registro. Quando um item 6 
apagado, no seu lugar fica um cspa<;o va- 
zio, con forme mostra a figura 1 . 
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(tea 
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Ilea 




w, 


4. ntpifo v<i lo no lugar 






de um Ilea apagado 
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Figura I 



£ importante voc£ saber que ao ser 
colocado um registro, o programa pro- 
cura justamente por um cspa 90 vazio. 
Caso este cspa 9 o n3o seja encontrado, o 
item serd colocado no final do arquivo. 
Aldm disso, se o arquivo for gravado no 
cassete depois de um registro ser apaga- 
do, o programa n3o grava um espa 90 va- 
zio. Assim, ao se carrcgar outra vez o 
arquivo, nffo serd mais encontrado um 
espa 9 o vazio entre os registros. 

A seguir 6 dada uma tabela de refe- 
renda com todas as fun^es que voce 
poderd utihzar. 



A - APACA H t H 0 R I A 
C - CONSUL I A AO ARQUIVO 
D - APACA RECISIRO 
L • LISIA ARQUIVO 
M - MODIF ICA HI CISTRO 
S - LER/CHAVAR NO CASSETE 
V • HANUTENQAO DO ARQUIVO 
X - COLOCAR RECISIRO 

Finalmente, para operar o programa, 
coloque (atravds da tecla MODE) o PC- 
1500 no modo RUN. Quando desejar 
uma determinada opera^o, pressione a 
tecla DEF e a letra correspondente a 
fiu^flo. Para facilitar, cstamos mos- 
trando na figura 2 um exemplo de lis- 
tagem de estoque com post o de sete 
itens, mas que podenam chegar a 200 . 



MIHII LISTMB1 00 1ST OOOl 


ttftttl 


C00/MMC 


(JUAMl. PRECO 




(WHO* 


1* 


res. as 


FI I.IOO 


3t 


Z3Q.M 


Loanron 


3Q 


i»Q.«a 


tWNC 


3 




FACA 


1 


1*W Art 


PHOTO 


/a 


23. M 


PAMELA 


23 


3/a. aa 


1 ITEMS EH 


ESTOQUE 





Figura 2 - Listagem geral 



Newton Duarte Brega Junior tern curto de 
programagOo COBOL pela Datamec a de pro- 
gram agio FORTRAN pela Univertidade Fe- 
deral de Mina* Gerais. Seu interests por ale- 
trOnica comegou no Curso da Escola Tien lea 
Re rends Ramell e, a partlr de 1980, earn am- 
pllando seus conhecimentos na Area de com- 
putagMo. Atualmente A proprletArio de doit 
micros: DG T-100e PC-1500. 
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Controle de estoque 






3 :"A" (CLEAR :D1M 


(I) ; : LPRINT 


75 :FOR I = 1TO 200: 


######### ## ", 


C-0END 




1$ ( 200) ,Q(200) 


TAB (15); USING 


IF I$(I>="” 


P(I) 


167: IF C < 1 0 R 02 




, P ( 200) : BEEP 1 


"####">0(1) ! : 


GOTO 77 


107: IF C-1GOTO 19 


GOTO 165 




,32, 399: BEEP 1 


LCURSOR 23: 


76: GOTO 80 


10 U: GOTO 110109C-0 


170 :ON CGOTO 171,1 




,64, 289: BEEP 1 


LPRINT USING " 


77:I$(I)-X$:Q(I)- 


: COLOR 1 


81 




,16,699 


######### .## •• . 


Y:P(I)-Z:GOTO 


110 :NEXT I :LF 2: 


171 :FOR I-1TO 200: 




4: PAUSE "MEMORIA 


P(I) 


65 


LPRINT USING " 


IF Q ( I ) - " " GOTO 




APAOADA" :END 


37 : LF 7: IF C“1 


80: NEXT I:BEEP 1, 


####"; CT>" ITE 


175 




5 : "C" :K“1: REM -C 


COLOR 1 


4 , 799$BEEP 1,1 


NS EM ESTOQUE" 


172 :PRINT # 1$ (I) : 




ONSULTA- 


40 iCLS : PRINT "CO 


6, 699: PAUSE "A 


; LF 7 : :END 


PRINT # Q(I) ,P( 




6: INPUT "COD/NOM 


D/NOME: ";I$(I 


RQUIVO SEM ESP 


120 : "V" :REM -VENDA 


I) 




E DO ITEM: ";C 


) : PRINT "QUANT 


ACO" :END 


S- 


175: NE XT I:I$(0)-" 




f : IF C$“"0 "END 


I DADE " " ; Q ( I ) 


90 : "L" : REM -LTST . 


130 : K“3 :GOTO 6 


FIM" :PRINT I 




7: IF LEN C$>15 


45 :PRINT "PRECO: 


ARQ- 


140: INPUT "OUANT./ 


(0) : END 




GOTO 6 


USING "##### 


95 :CS1ZE l:COLOR 


VENDIDA -> "; J 


181: FOR I=lTO 200: 




10: FOR I-1TO 200: 


####, " ;P (I) : 


1 :C“0 :CT=0 


141 : IF Q ( I ) - J<0 


INPUT # T$(I) : 




IF I*(I)«C» 


END 


97 :LF 2 :LPR1NT "* 


GOTO 150 


IF Ij (I) “"FIM" 




THEN ON KGOTO 


50 : "D" :K*=2 :REM -D 


****** LISTAGE 


1 4 2 : 1 F Q ( I ) -J> 2 


END 




20,55,140,200 


EL. REG- 


M DO ESTOQUE * 


GOTO 145 


182 : INPUT # Q ( I ) ,P( 




15: NEXT 1:BEEP 1, 


53:GOTO 6 


******** . lp ^ . 


143 : BEEP 1 , RND 100 


I) : NEXT I :END 




2 00, 250: PAUSE 


5 5 : 1 $ ( I ) - " " : PAUSE 


LPRINT "COD/NO 


: PAUSE "ESTOQU 


190 : "M M : REM -MOD . R 




"NAO EXISTE -- 


C $ ; " : APAGADO" 


ME"; 


E BAIXO" 


EG- 




> " ; C$ : END 


: END 


9 8 : LPRTNT TAB (15 


145 :Q ( 1 ) =Q ( I) -J : 


195 :K=4: GOTO 6 




20: INPUT " IMPRIMI 


6 0 : " X " : REM -IN . RE 


) ; "QUANT."; : 


END 


200 :X»-"" : INPUT "C 




R (P) " ; C$ : IF C 


G- 


LPRINT TAB (23 


150: BEEP 1 , RND 100 


OD/NOME -> " ; X 




$ “ " P " GOTO 40 


65 :BEEP 1,64,289: 


) ; "PRECO" : LF 2 


: PAUSE "VENDA 


$ : IF X$="0 "END 




30 : COLOR 1:CSIZE 


INPirr "COD/NOM 


100: FOR I • 1TO 200: 


IMPOSSIVEL": 


201 :Y-0: INPUT "QUA 




1 : LPRINT "*** 


• E «> " ; X $ : I F X 


IF 1$(1)="" 


BEEP 1 , RND 150 


NT. -» ";Y:Z=0 




REG: USING " 


$-"0"END 


GOTO 110 


: PAUSE "SALDO 


: INPUT "PRECO 




###' ; I ; " ***" 


66: IF LEN X$>15 


101 :CT-CT+1 


NEGATIVO" 


“> " ; Z 




31 : 1, PRINT "COD/NO 


GOTO 65 


10 3: IF Q ( I ) “2THEN 


151 : BEEP 1 , RND 100 


202 :IF X$=" "GOTO 2 




ME"; : LP R I NT 


70: INPUT "QUANTID 


COLOR 3 :C=1 


:PRTNT "DIFERE 


04 




TAB ( 15 ) ; "QUNT 


ADE -> " ; V : IF 


105 :LPRINT I$(I) ; : 


NCA " ; ABS ( 


203 : 1 $ ( I ) =X$ 




. " ; : LPRINT TAB 


Y>999GOTO 70 


LPRINT TAB (15 


Q ( I ) -J) :END 


204 :IF Y-OGOTO 206 




(23) ; "PRECO" 


73: INPUT "PREQO = 


) ; USING "####" 


160 : "S" : REM -IJIR/G 


205 :Q ( I ) “Y 




33 : IF Q ( I ) <— 2THEN 


’ " ; Z : IF Z>999 


; 0 ( 1 ) ; 


RAVAR- 


206: IF Z=OGOTO 210 




COLOR 3 :C=1 


99999. 99GOTO 7 


1 06 :T,CURSOR 23: 


165: INPUT "1=-IER 2 


207:P(I)-Z 




35 : LF 2: LPRINT 1$ 


3 


LPRINT USING " 


-GRAVAR";C:IF 


210 : END 


m 




• FITAS MAGNfTIGAS 

• DISCOS magnEticos 

• DISKETES (8 e 5 1/4) 

• FITAS IMPRESSORAS (UNHA COMPfcETA 
MINI/MICROS) 

• DATA CARTDRIDGE 

• ACESSORIOS (I TIQUETAS, TAPE SEEL, WRAP 
AROUND, CARRE TEIS, REFLETIVOS) 



• CONSULTE NOSSOS PREQOS 

• CONDIQ0ES FSPECIAIS P/REVENDEDORES 

Plantfio d© vendas Supri-SOS « (01 < 5 ^ 291^7 
Central Blp: 815-3344 -(5AK7) 



SUPRIDATA - COM. E REPRESENTAQAO LTDA 



• SP - R. Brejo Alegre, 348 - Tel. 543-0515 

• RJ - R Dorn Gerardo, 63 - s/1903 - 



.Tel.: (021) 233-9849 

Representantes em todas as Capitals do Pats. 



MINAS DIGITAL 
O SHOPPING DA 
COM PUTAQAO 

• Vendas de micro-computadores 

• Vendas de pepas e componentes para micros 

• AssistSncia t6cnica & micros 

• Vendas de livros e revistas sobre computapSo 

• Vendas de disquetes formuiarios e fitas mag. 

• Cursos de digitap3o e programap3o 

NA MINAS DIGITAL 
VOCe ENCONTRA TUDO 
SOBRE MICRO-COMPUTADORES 



201-7555 

Rua Tupinambas 1045 - Conj. 601 /602 - Centro Rua Torn* 
de Souza 860 - Loja B - Savassi 



ATENDIMENTO POR REEMBOLSO POSTAL 
PARA TODO O BRASIL. 
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E SP®& 

COMPUCITY. 



tss“r.v*“i.o p £*. »«■»« 

"” ,< S,ro P »c«y. O Q ue ■*> “* "° 

progrania. 




Complicity 



Kua Tome de Souza, 882 - Savassi. Fone: 226 6336. BII - MG. 




O Instituto Brasileiro de Administrate) 
Municipal atrav6s do seu 
Prograina de Recursos e Desenvolvimento, 
em convSnio com o Cespro promover£ 
a partir do mfis de Junho, os seguintes 
cursos na Area de Micro Informdtica: 



IN TRODU^AO AOS 



MICROCOMPUTADORES 



E 



LINGUAGEM BASK 



Todos os cursos terfto aulas pr&ticas 
com microcomputadores 



Iniormugoes e inscribes: 



IBAM - Rua Visconde Silva, 157 Humait& - RJ 
Tel.: 266-6622 - Ramais 251 e 252 
Das 9:00 hs. ks 21:00 hs.' 




S/L VA, Jos* Amtrlco. 
Criungu tarnb4m 
faz programas. 
Editors Campus Ltda., 
CrS 1.390,00 (Jun/83). 




Com bem-h unnorad as e significativas ilustragoes, em 
linguagem adequadamente simples e diddtica, este 6 o 
primeiro livro publicado no Brasil destinado a introduzir, 
de maneira f£cil, criangas e adolescentes na arte e tdcnica 
de programar em linguagem BASIC um microcomputa* 
dor, preparando-os para o uso de um instrumento que 
dominard o dia-a-dia das novas geragdes. 

Desvendando os segredos da estrutura e do funciona- 
mento da mdquina, o texto, atravds de explicagoes ame- 
nas e sem problemas de grande complexidade, encami- 
nha com seguranga seus jovens leitores & assimilag3o das 
nog&es elementares do microcomputador, possibilitan- 
do-lhes sua utilizag3o como uma segura opgSo de estudo 
e lazer. 

O primeiro capftulo, narrando usos e costumes, acorn- 
panha a evolugdo dos numerosos instrumentos para cdl- 
culos surgidos na Antiguidade, ati chegar aos microcom- 
putadores dos nossos dias. Partindo da idade da pedra 
lascada, vSo desfilando: o Abaco, que os Chineses inven- 
taram; a Pascaline, criada por um trances chamado Blaise 
Pascal; e vArias outras invengbes at6 chegar ao ENIAC, 
em 1946, o primeiro computador comercial de que se 
tern notfcia. 

A formagSo do computador 6 apresentada, no segun- 
do capftulo, dividida em quatro partes principals: Uni- 
dade de L6gica e Aritmdtica, Unidade de Memdria, Uni- 
dade de Controle e Unidade de Entrada e Saida. J4 o 
terceiro capftulo 6 dedicado ao BIT e a sua missSo de 
formar letras, numeros e sinais especiais. 

0 quarto capftulo apresenta o microcomputador e 
demonstra como 6 formada a sua memdria. Os dois ul- 
timos ensinam sucessivamente como "Conversar com o 
Microcomputador" e, f inalmente, como programd-lo. 

Durante a fase de elaboragSo deste livro foram util i- 
zados como leitores experimentais duas criangas e um 
adulto, tendo o autor recebido dados e respostas que de- 
ram base & conformagSo final do livro. A narrativa flui 
natural, por vezes em didlogo direto com a crianga, 
transformando o trabalho num pequeno conto que in- 
duz d leitura espontdnea e assimilagSo sem esforgo dos 
conceitos fundamentals apresentados. 
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"De programador e musico todos nds temos um pouco". E se voce tambem 
tem um HP-75, nao deixe escapar esta chance. 



No ritmo do HP-75 

Paulo de Salles Mourao 



V ivemos ]&. em plena revolinjao 
cibemetica e, no entanto, vez 

por outra precisamos de certos 

dados que s6 a d uras penas conseguimos 
alcanfar. 

Isto aconteoeu comigo ao tentar 
obter as frequendas dos sons musicais a 
fim de compor musiquinhas no HP-75. 
Sabe como fiz afinal? Peguei meu 
viol So, medi o comprimento de cada 
traste ate a parte que fica presa 4 sua 
caixa (por onde entram as cordas) e, 
baseado em uma frequenda de 440 para 
o LA normal, deduzi, pelas leis das 
cordas sonoras, as frequendas da oitava 
m£dia, incluindo os semitons da escala 
temperada. 

Pronto, resolvi meu problema: para 
achar a prdxima oitava mais alta, basta 
dobrar as frequendas, Claro que alguma 
impreds5o se in corpora, mas posso 
garantir que fundona a contento. EnttTo 
imaginei que seria util fomecer tais 
frequendas para aqueles que tivessem 
o mesmo objetivo. Pois aqui estao elas, 
na figura 1 . 

E para completar e exemplificar, es- 
crevi um programa que executa a toada 
diamantinense Peixe Vivo. Voce podera 
observar que os inputs KeL permitem, 
respectivamente, transpor a melodia a 
frequendas diferentes e govemar o 
andamento (veloddade). Sugiro come- 
9 ar com K -1 e L =3. 




Peixe Vivo 



10 DATA 329,1,390,1,390,1,348,1,348,1,440,1 
20 DATA 440,1,390,1,329,1,390,1,390,1,348,1 
30 DATA 293,1,348,1,328,2 
40 DATA 293,1,328,1,261,1 

50 DATA 261, 1,261 , 1,440, 1 . 5, 494, .5, 522, 1 .5, 494 , .5, 440, 1,390,1 
60 RESTORE @ INPUT , K,L’;K,L 

70 GOSUB *100® GOSUB 140® RESTORE 50® G6SUB 140 
80 RESTORE @ GOSUB 100@ GOTO 60 
100 FOR J=1 TO 12 @ GOSUB 200® NEXT J 

110 FOR J=1 TO 3® GOSUB 2 00 @ NEXT J 

120 RESTORE @ FOR J=1 TO 12@ GOSUB 200® NEXT J 
130 RESTORE 40 @ FOR J=1 TO 3@ GOSUB 200® NEXT J@ RETURN 

140 WAIT 2 . 5 *L @ FOR J=1 TO 8® GOSUB 200® NEXT J@ RETURN 

200 READ A, D @ BEEP K*A, L*D @ RETURN 





Paulo de Salles MourSo d Engenheiro Civil, formado pela Universidade Federal de Minas 
Gerah e um dos fundadores da Biblioteca de Programas de Cdlculo Eletrdnico da Sodedade 
Mineira de Engenheiros, onde 6 membro do Conselho Tdcnico. *" 



dBASE CURS0 PARA GERENCIAMENTO DE BANCO DE DADOS PARA VOCE! 

n Voce pode ter um Domfnio total de seus Dados. * Criar e Gerenciar Arquivos. * Fazer todos os possf- 
veis Relatdrios e Pesquisas com base nos Arquivos. * Treinamento de 16 hs. em MICROS. Caso vo- 
ce n3o tenha MICRO, o curso Ihe dar£ condigoes de decidir com base em fatos. 

Statema Relational 

Pa g dBMICRO - AV. PROFESSOR ALFONSO B0VER0, Z18 - TEL.: 263-0711 
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Marque um momento importante no seu jogo ou a espera de entrada de dados 
em um programa pelo som de beeps. Pode-ser uma grande ajuda . 



Efeito sonoro no TK e NE 

Octavio Nogueira Neto 




Figura 1 



eralmente quando estamos jo- 
gando no TK e NE, ou entSo 
quando estamos trabalhando 
em programas muito longos, que de- 
moram um certo tempo para rodar, sen- 
timos falta de efeitos sonoros que nos 
indiquem um determinado momento no 
jogo, em que ponto devemos entrar com 
os dados, se o computador estd pronto 
para recebe-los etc. Dispondo de um 
beep, nosso problema estaria resolvido, 
certo? 

A forma normal de se fazer um beep 
seria liga-lo a uma das portas de safda do 
micro, mas isto traria oertos inconve- 
nientes: terfamos, por exemplo, que es- 
crever uma rotina em linguagem de ma- 
quina no corner do programa, uma vez 
que o BASIC nao tem acesso direto as 
portas do micro. 

Sabendo desta e de outras desvanta- 
gens, resolvi optar por outro mdtodo. 0 
beep foi colocado como se fosse uma 
posifSo de memoria; assim, basta fazer 
um POKE naquela posifdo para que ele 
emita um som. Com isto eliminamos a 
rotina em linguagem de maquina, pois 
o beep e ativado pelo propno BASIC. 
Para simplificar o drcuito de decodifi- 
cngSo usei ainda um outro artiffcio: o 
beep n5o estd como uma finica posi^ao 
de memdria, mas de uma posi^ao em 
diante. 

No esquema apresentado na figura 1 
podemos observar que a unica linha de 
endere<jo utilizada foi a A15. Analisan- 
do o esquema, vemos que, para a safda 
ir para nive l baixo, 6 necessario que 
A 15= 1, WR= 0 e MREQ=0, ou seja, a 
safda ir A para o nfvel baixo quando es- 
crevermos um dado numa posigSo de 
memdria maior que 2 1S , isto 4, 32.768. 



Entdo, para ativar um beep, 6 s6 fazer 
um POKE em qualquer posi^Jo acima 
de 32.768. E importante frisar que nao 
hd perigo de que um programa venha a 
usar estas posifOes de mem6ria: elas 
ndo estdo disponfveis para ele. 

O circuito que gera o som 6 cldssico 
com dois integrados. 0 primeiro fundo- 



na como monoestdvel, controlando o se- 
gundo, que 6 estdvel. ^ 

Octavio Pupo Nogueira Neto estuda Engenha- 
ria ElatrOnica na FEi. interessase por eiaXrb- 
n/ca desde os 14 anos, a desde entSo vem ad- 
quirindo conhecimantos sobre a matdria a tra- 
ils do fivros a re vistas tdcnicas. 
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As linhas completas de 
microcomputadores, das marcas 
de absoluta qualidade, voce 
encontra na Imares. E em regime 
de pronta-entrega. 

Parece igual a outras lojas de 
computadores? Mas nao e. Para 
im'cio de conversa, a Imares 
implantou uma filosofia propria 
de comportamento que engloba 



uma serie de servigos: coloca 
equipamentos, softwares e 
pessoal experiente a disposigdo 
da sua clientela e da global 
orientagdo de compra do 
equipamento adequado as suas 
necessidades, atuais efuturas. 
Feita a escolha, o seu 
relacionamento com o 
microcomputador sera de 



permanente tranquilidade . 

A Imares tern um corpo de 
tecnicos de hardware e software 
altamente especializado, pronto 
a prestar plena assistencia 
tecnica e manutengdo , sempre 
que necessdrio. E de mais 
a mais, na Imares o seu micro tern 
dupla seguranga : da propria 
Imares e do fabricante . 




Na Imargs 

seu micro tem 

dupla seguranca 



imcife?* 

microcomputadore/ 



Av. dos Imares, 457 - Pels.: 61-0^46/4049 - CEP 04085 - Moema - SP 
Rua Dr. Renato Paes de Barros, 34 - Tels 88 1 -0200/1 156 - CEP 04530 - ltaim - SP 



Eis aqui um programs para o D-8002 que vai the dar uma "maozinha" 
nesta louca corrida contra (ou a favor) dos juros. 



Tabela Price em BASIC 

Ivan Fa/cao de Domenico 




sempre bom a gente fazer uma 
aplicasao financeira ja sabendo 
antes o quanto nemos lucrar 
(evitando decep 9 bes). £ mais seguro pe- 
dir um emprdstimo ou financiamento 
conhecendo, de antemao, o valor das 
mensalidades a serem pagas de acordo 
com o prazo escolhido (evitando surpre- 
sas desagradaveis). 

Pensando msso, resolvi ciaborar um 
programa de Matematica Financeira ba- 
seado na Tabela Price, o qual poderi ser 
aplicado em projegSes que envolvam ju- 
ros de 6%ao mes. 

Imagine, por exemplo, que o usuano 
deseja saber quanto rendera a Caderneta 
de Poupan^a cujo montante inicial £ de 
CrS 10 rrul, rendendo juros de 6% ao 
mes, durante scis meses. Basta tomar, na 
Tabela Price (veja figura 1), o fator mul- 
tiplicative da coluna FJC* relativo a 
tres meses — 1.19102 — e multiplica-lo 
pela soma uncial de Cr$ 10 mil. Teria- 
mos, portanto, a quantia de CrS 11. 

902.00, que e o resultado final de CrS 

1 0.000. 00 x 1.9102. 

Outro caso sena o do usua'no que de- 
seia saber quanto pagara de presta 9 oes 
mensais relativas ao financiamento de 
um veiculo cujo valor e CrS 1 milhao.a 
ser fmanciado em 18 meses a uma taxa 
de 6% ao mes. Recorrendo a Tabela Pri- 
ce, ele deverd tomar o fator multiplica- 
tive na coluna FRC, na linha correspon- 
dente a “18 meses”, que no caso e' 
0.0923566, e multiplici-lo por Cr$ 1 
milhao, obtendo, assim, a presta 9 ao 
mensal de CrS 92.356,60. 



Figura 1 - Tabela Price - juros de 6% 

O programa foi rodado no D-8002 e 
e totalmen te auto-explicativo. Veja, no 
box anexo, o que representam os sim- 
bolos utilizados. 



Ivan Falcao de Domenico d Engenheiro Civil e 
Diretor Presidents da ORION Engenharia e 
Empreendimentos Imobilidrios Ltda. 



/ I/^TaXl^juros por period#/ *C ' • M» - Soma futura de dmheiro 

®t I no Tim de n periodos, equivalente a 
Wz ^ , ^ MoC/taxas de juros. 

I fmportln&a lafualTsqbna ,* A - Cada pagamento numa s£ne 

fannl/aim nttrn 'r-o A svwi / ' /tin tf r Hr* n tintfamfin tr>S A soma 
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Programs Matematica Financeira 



1 REM PROS PARA CALCULD DE TASELA PRICE 

2 REN COPYRIGHT!*) DE DOMENICO 82 

3 REN VOLTA 300 K-7 OOIA VOL=7 TDNE-9 

4 CLEAR 2000 

5 INPU7-7AXA DE JUROS I(INICIAL) E 1* (FINAL) E No DE MESES X’*;I,K,X 

6 DIN FJCtX).FVA(X), JC(X) >VA(X) >FF!X) jRCtX) 

10 CLS 

16 FOR 1= I TO K 

26 LPRItiTs LPR INTiLPR INT 

27 LPR1NTCHR$(I4)TA8(22))*TABELA PRICE -JUROS DE”!*)! 

28 LPRINTTAB(33)?“( Cortesia de ORION Eneenfcaria e Einreendisentos Igobiliarios Ltda : LPR INTtLPRINT 

30 FOR N= I TO X 

40 FJCfPO=( 1+I/IOOXR 

41 FVA(N)=1/FJC(N) 

42 JC(N)=<FJC(N)-1)/(I/100! 

43 FF(»)=1/JC(N> 

44 VA!N)=(FJC!N)-l)/(FJC(N>*I/100l 

45 RwtN)=l/VA(«> 

50 NEXT N 

64 LPRINTEHRK14) I * X" : LPRJ NT 

65 LPRINTCHR$I15)TAP(2G) ! ’'MESES V'FJC*”, "FVA* VTJC”, "FVA'VFFA”:. “FRC”: LPR I NT 
67 FOR Y=1 TO X 

70 LPRINTCHR* ( 15) TAB <20)5 YiFJCfY) ,FVA(Y), JC(Y)>VA(Y)»FF(Y) ,fi[ (Y) 

80 NEXT Y 

31 NEXT I 

35 PRINT"VDCE GUER OliTRA TABELA CON C1FERENTE5 JUROS?”; INPUT N4 
86 I F N$="5IN' GDTQ 1 ELSE 87 

S7 LPR I NTCHR* ( 1* ) TAB 1 22) » ’T A E E L A P R I C E*: LPRINT: LPR! NTTAB (30> > * ( Cortesia de ORION Ereenharia 5 Espreencir-er tc= Ircfciliar 

IOS Ltda ) “ : LPRINTP LPRINfT: LPRINT; LPRINT ; LPRIMT : LPR1MT: LPRIKT sLPRINT“S I N B 0 L 0 G I A ” J LPR INT : LPR I WT 

33 LPRINT*I= TAKA DE JUROS POP PERI DDC”s LPRI NT ”n= MUMERO DE MESES”:LPRINT”Mo = IMPPGRTANCIA ATUALfSDMA DE DINHEIRC NUN CEPTt IN^TA 
NTE CONSIDER ADO COMO PRESENTE) EX: VALOR DE UK TERRENO 'A VISTA” 

39 LPRINT“Mn = SOMA FUTURft DE DINHEIRO QUE NO FIM DE n PERIODQS E EBUIVALENTE A Ho C/ TAXAS DE JUROS.": LPRINT "ft = rADA PAGANENTD 

OU PRESTADA3 NUMA SERIE UNIFORME DE n PA5AMENT0S, A SOMA DA 5ERIE E IGUAL A Mo x TAXAS DE JUROS (i!,‘ 

90 LPRINT 

9L LPRINT-A FIN DE FACILITAR A NEMORIZACAC DOS FATORES DE JUROS CONPOSTOS IDEKTIFI CAREMD5 70D0S ELES COM FORMAS MNEUKCNICR< PARA 1 
ELAKENTE C0LQCAREN03 TAMBEM AS DEFINICDES EM INGLES, PARA FACILITAR . •: LPRIPJT: LPRINT 

92 LPRINT”!- GRUPO DE PASAMENTQ UNICO !*)“:LPR3NT 

93 LPRINT”!- FJC*= FATOR DE JURQ CONPOSTO OU CAPITALIZAD-iPAETo UNICO). - CAF* = COMPOUND AMOUNT FACTOR (SINGLE PAYMENT) 

94 LPRINT“2- FVA*= FATOR VALOR ATUALI PAGTo UNICO PHF* = PRESENT NORTH FACTDRfSINGLE P AYMENT” 

95 LPRINT: LPRUNT 1 ’! I - SRUPO DE SERIES UNIFDRME5 (PRESTACOESI “:LPRINT 

96 LPRINT”3 FJC = FATOR JUROS CAP ITALI2ADG [ SERIE UNIfORKE! CAF = CDMPOUND AMOUNT FACTOR (UNIFORM SERIES!" 

97 LPRINT“4- FVA = FATOR VALOR ATUAL (SERIE UNIFORME) PMF = PRESENT NORTH FACTOR (UNIFORM SERIES). 

98 LPftlNT’5- FFA - FATOR FUNDD DE AMQRTI2ACA0 SFF = SINKING FUND FACTOR 

99 LPRINT‘6- FRC = FATOR RECUPERACAO DE CAPITAL CRF = CAPITAL RECOVERY FACTOR”: LPRINT 

100 LPRINT:LPRIMT:LPRINT J ‘ ESUACDES LPRINT: LPRINTi LPRINT" AS EEUACOES AEAIXO MOSTAM AS RELAC0E5 COMO U<AR A TAFE1A PFrt":LP 
RINTiLPRINTiLPRINT 

101 LPRINT* DADD Mo - Mn?. . .Mn = Ho x (FJC*) PAGTo UNICD’iLPRINT 

102 LPRINT'DADO Mn- Mo?. . .Ho = Mn x (FVA*) PAGTo UNICO": LPRIMT 

103 LPRINT”DADO A - Mn?. . .Hn = A x (FJC ! SERIE UNIFORME* : LPRINT 

104 LPRINT'DADO Mn- A?. . . A = Mn X (SFF) SERIE UNIFORHE*: LPRINT 

105 LPRINT’DADO Mo- A?. . . A = Mo X (FRC) SERIE UNIFORME” SPRINT 



101 LPRINT'DADO Mo - Hn?. 

102 LPRINT'DADO Mn- Mo?. 

103 LPRINT’DADO A - Mn?. 

104 LPRINT'DADO Mn- A?. 

105 LPR INT” DADO Mo- A?. 

106 LPRINT'DADO A - Mo?. 

107 END 
1651? 



.Mo = A X (FVA) SERIE UNIFORME*:LPRINT 



POR ESSA 

Uma novidade qua parece urn acha- 
do. 0 SONAB/INSPEC. 

Voce recebe resumoa seleclonados 
pelo computador, dentro do amblto 
exato do seu interesse — pontual- 
mente a cada 15 dlas. 

Veja alguns assuntos abordados: 



VOCE nAo esperava... 

apllcagdes, tecnologia de software, 
controle de processos, automagao de 
escritorios, mlcroeletronica, para ci- 
tar apenas alguns. 

Tudo isso pelo preqo da assinatura 
de uma revista: 5 ORTN’s por ano. 

E voce ainda pode fazer uma expe- 



rience: recebe o servlgo durante dois 
meses, sem pagar nada. 

E facil: Telefone, escreva ou envle 

• um telex ao CIN. 

Com taa to Naclonal dm Energia Nudwr 
Centro de InfamwfA** Nuchtiw 
Ru* General Severiano, 90 
fffc 22294 Rio do Janeiro - R J Bread 
It Tal.; (021) 299-9646 Talax (021) 21290 CNEN BR 
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Agora voce ja tem um comp i/ador para poder usar a famosa Hnguagem FORTH , 
em micros TRS-80 e compativeis. 



Compilador FORTH 
para Z80 



Antonio Costa 



U ma das linguagens para micro- 
computadores cuja popularida- 

de vem crescendo rapidamente 

nos Estados Unidos 6 o FORTH. Progra- 
mas nesta linguagem sao publicados qua- 
se todos os meses em revistas americanas 
e , entre estes, esta o vencedor do ultimo 
concurso Byte de jogos de video. A 
pnncipal razao para esta populandade e 
ser o FORTH rtfpido e compacto e, por- 
tanto, ideal paia aplica$5es em que a 
economia de memdria e velocidade de 
processamento sao elementos cructais. 
Entre estas aplica^oes, estao os jogos de 
video, o processamento de texto, o con- 
trole em tempo real, a aquisitjao de da- 
dos e o processamento de imagens. 

Pode parecer exagero mas a verdade e 
que FORTH € a unica linguagem de alto 
rn'vel que possibilita elaborar jogos de 
video de boa qualidade em microcom- 
putadores. Os jogos desenvolvidos com 
os compiladores de BASIC, Pascal ou 
LISP disponiveis no mercado usam mui- 
to mais memdria do que o necessario,e 
os desenvolvidos com intdrpretes sao 
lentos demais. Acredito, pordm, que es- 
ta n3o foi a unica razao que levou as em- 
presas do porte da Atari, por exemplo, a 
escolherem o FORTH para seus jogos. 
Outra razao pode ser a comodidade com 
que se pode criar grab cos animados. 



O COMPILADOR 

0 compilador aqui apresentado i 
compacto, rapido e se destina ao desen- 
volvimento de jogos de video e de estra- 
tegia. Ele faz 16 mil multiplicaQQes in- 
teiras em pouco mais de dez segundos. 
Aceita palavras de atd 255 caracteres e 
os reconhece todos. Trabalha em qual- 
quer base de numeracao. E totalmente 
recursivo, como LISP ou LOGO. Possui 
todos os recursos que lhe permitirao es- 
tendS-lo a vontade, entre eles as pala- 
vras < BUILDS e DOES >- Foi escrito 
em linguagem de maquina do Z80 e fun- 
ciona sem modificagOes no D-8000, 
DGT-1 00 e CP-500. 

Vejamos entao como introduzir o 
compilador em seu computador. Cad a 
lmha da listagem 6 constituida pelo en- 
derego onde ela deve ser introduzida, se- 
guido por 16 bytes de codigo de maqui- 
na e pela somatoria decimal destes 16 
bytes. Voce deve usar um monitor do ti- 
po DEBUG ou DIGBUG para colocar os 
16 bytes no enderego especificado. 
Quando terminar de passar o compila- 
dor para a memdria, escreva um progra- 
ma em BASIC para calcular a somatona 
de cada grupo de 16 bytes e compare 
seus resultados com os impressos na lis- 
tagem do compilador; se houver discre- 



pancy, corrija a lmha correspondente, 
Por£m, antes de escrever seu programa 
em BASIC, n3o se esquefja de protegee 
a regiao de memdria onde est£ o compi- 
lador. 

Para obter uma cdpia do compilador, 
execute -o a partir do enderefo 5E5I e 
voc6 verl na tela a mensagem FORTH 
INICIALIZADO. Se seu computador e 
um CP-500 e voce teclar CSAVE apds 
esta mensagem, o compilador gravarri 
uma cdpia de si mesmo numa Fita cas- 
sete. 

Ja se voce possuir um Dismac D-8000, 
DGT-1 00 ou TRS-80 Modelo I, voc6 de- 
ve teclar o programa da listagem de 
CSAVE/DISMAC (figura 1). Ao fazer 
isto, respeite rigorosamente os espa 90 s, 
pois eles nlo s5o optativos em FORTH., 
Finalmente, grave sua cdpia do compi- 
lador usando CSAVE/DISMAC em vez 
de CSAVE. 

As cdpias gravadas segundo estas ins- 
tru^des sfo do tipo SYSTEM e se cha- 
mam FORTH. 



CREATE CASD 

AF C, CD C, 12 C, 02 C,, 
NEXT ! 
CSAVE/DISMAC CASD CSAVE S 



Figura 1 — Listagem do CSA VE /DISMAC 
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D/MOD 


SIGN 
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Vdrias palavras pertencentes ao 
FORTH padrSo n<To foram incluidas em 
nosso compilador. No entanto,voce deve 
inclui-las na linguagem antes de come far 
a programar. As definifoes destas pala- 
vras sao dadas a seguir e devem ser in- 
troduzidas no computadoi com FORTH 
trabalhando na base 1 6: 

• HOLD — Usado na formatafSo de 
mimeros: 

2 HOLD SWAP ; 

• LIST — Lista buffer cujo enderefo 
esta no TOS: 

! LIST OUP DUP 2 - @ + SWAP DO I 
C@ EMIT LOOP ; 

• LOAD — Compila buffer cujo ende- 
refo esta no TOS: 

: LOAD LBP ! 1 FTOKEH ! OUTTN ; 

• FORGET — Esquece parte do dicio- 
nario: 

: FORCET CURRENT @ CONTEXT < ■ DUP 2 - @ 

CURRENT ® I OP @ C@> 3 v - DP ! ; 

• IMMEDIATE — Coloca palavras no 
vocabulano de compilafao: 

: IMMEDIATE ENTRY DUP DUP C@ t< t DUP 

@ CURRENT @ ! COMPILER © SWAP f 
COMPILER I ; 

• BEGIN ... UNTIL — Controle de lafo 
de repetifSo: 

: BECIH HERE ; IMMEDIATE 

UNTIL »# ‘END END, i IMMEDIATE 

• BEGIN ... WHILE ... REPEAT - 
Controle de lafo: 

: WHILE •# *IF DO, » C, • IMMEDIATE 

REPEAT SWAP »# *WHLLE END . HERE OVER - 
SWAP C! i IMMEDIATE 

« ALLOT — Reserva espafo no dicio- 
nario: 

: ALLOT DP +1 ; 

• / — Divisdo inteira: 

w It SWAP D/HOD DROP ; 

• /MOD — DivisSo com resto: 

: /HDD B SWAP D/MOD SWAP ; 

• # IN — Le mimero e coloca no 

TOS: 

! #IN BECIH .* ?- SDBB DUP LBP ! INPUT 
ASPACE TOKEN NUMBER UNTIL ; 

• DECIMAL — Coloca FORTH na base 
10 : 

: DECIMAL DA BASE ? 

« HEX - Coloca FORTH na base 16: 

: HEX IB BASE ! ; 

« BUFFER — Permite criar buffers: 



Figure 2 — Palavras incluidas no nucleo basico 

; BUFFER < BUILDS t , ALLOT D0ES> 2 j 

As palavras do nucleo basico acresri- 
das destas que acabei de definir formam 
um FORTH bastante completo, mas se 
voce tentar usar um programa FORTH 
neste compilador e ele nao funcionar, 
verifique ,qual palavra causou problema 
e defina-a, da mesma maneira que defi- 
m FORGET, IMMEDIATE, /MOD etc. 

As palavras inclufdas no nucleo basi- 
co est£To na figura 2 e as variaveis e cons- 
tantes do sistema sao as seguintes: 

MODE LBP CURSOR E TOKEN BASE ASPACE 
CONTEXT CURRENT COMPILLER STATE DP MERE 



Nao incluimos dupla precisd'o, visto 
ser desnecessdria em jogos. 

Voce devera escrever um editor para 
corrigir erros nos buffers. Tal editor po- 
dera ser em FORTH ou em linguagem 
de mdquina. Vou mostrar como cnar 
uma palavra em linguagem de mdquina 
por meio de um exemplo. Eis como 
criar a palavra NOT: 

HEX CREATE HOT ET C, 7D C, 8* C , 11 C, B. 

20 C, 1 C, 1C C, DS C, NEXT 



Fdcil, nSo? Disassemble NOT para 
ver como ele funciona. 

COMO USAR BUFFERS 

Qualquer programa que voce teclar 
sera imediatamente compilado e a fonte 
se perderd. Para prcservar o programa 
fonte 6 conveniente guardd-lo num buf- 
fer. Voce poderd criar dois tipos de buf- 
fers: os temporaries e os permanentes. 
O buffer temporario deve situar-se abai- 
xo de 5DC0 (24000 em hexadecimal) e 
nS'o serd gravado por CSAVE ou CSAVE/ 
DISMAC. Eis como entrar com um pro- 
grama num buffer temporario localizado 
em 23000; 



OECIHAL 23000 INPUT 
: OU^DRADO DUP * ; 

Para compilar este programa, tecle 
23000 LOAD e para lista-lo tecle 23000 
LIST. 

Para criar um buffer permanente de 
500 bytes, tecle DECIMAL 500 BUF- 
FER TUTU, onde qualquer nome pode- 
ra ser usado no lugar de TUTU. Eis co- 
mo entrar com um programa no buffer 
TUTU: 
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TUTU IKPUT 

: CUBO OOP DUP » « j 

Para compilar TUTU, tecle TUTU 
LOAD, e para listar tecle TUTU LIST. 

Finalmente, inform amos que o com- 
pilador foi projetado para maquinas de 
16 Kb, sendo, contudo, facil modificd- 
lo para usar toda a memdria de mdqui- 
nas maiores. Para isto voce deve afastar 
para o "fim da memdria os ponteiros da 
pilha de retomo e da pilha de parame- 
tros que estao nos enderegos 5DC7 e 
5DC1, respectivamente. Para um com- 
putador de 48 Kb, sugiro colocar nestes 
ponteiros os valores -1 e -2000, teclan- 
do: 

HEX -1 5DC7 I -2000 5DC1 ! 

Em seguida, tede QUESTION para 
reiniciar o FORTH. E, 6 claro, faga uma 
gravagdo do compilador usando CSAVE 
ou CSAVE/DISMAC. Esta gravagao sera 
de um compilador para 48 Kb. 

Recomendo ainda que os leitores ad- 
quiram livros sobre FORTH para um 
melhor entendimento da linguagem. 
Dois livros que podem ser encontrados 
nas livrarias especializadas do Rio e de 
SSo Paulo s3o Starting FORTH, de Leo 
Brodie e FORTH, de Rnetch, observan- 
do-se que o FORTH aqui apresentado 
n3o 6 totalmente compativel com as ver- 
s5es descritas nestes livros, o que n3o 
invalida sua leitura. 

Nota: Este artigo apresenta o chamado 
nucleo da linguagem FORTH; ndo e 
um sistema de desenvolvimento de 
software FORTH. Este ultimo contain, 
aldm do nucleo bdsico, editores de tex- 
to, Assembler, aritm^tica de ponto 
flutuante, inteiros em dupla e tripla 
precisSo, sistema operacional, contro- 
ladores de impressora, formatadores de 
entrada e saida programdveis, compi- 
lador cruzado (que permite gerar cbdi- 
go de mdquina recolocdvel), manipu- 
lador de grdficos, manipuladores de 
texto, gerador de compilador (que per- 
mite ao usudrio criar sua prdpria lin- 
guagem) etc. Este sistema contdrn, por- 
tanto, tudo para facilitar o desenvolvi- 
mento de software comerdal e cientf- 
fico. Seria tambdm interessante frisar 
que este compilador nfio d compativel 
com o sistema FORTH desenvolvido 
pelo autor e por Humberto Jemma, ou 
com outros sistemas FORTH, como o 
MMS FORTH ou o Poly FORTH. 



Antonio Eduardo Costa Pereira 6 formado em 
Engenharia Etetrdnica pels Escola PolitScnica 
da USP e em Ffsica pelo Instituto de Ffsica 
da USP. Fez Mestrado em CiSncia Especial no 
Instituto de Pesquisas E spa dais em SSo Josd 
dos Campos, SP , e Doutorado em Engenharia 
Etetrdnica na Cornell University em Ithaca, 
Nova Yorque (EUA). Atualmente 6 professor 
na UNESP. 
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INSTITUTO DE TECNOLOGIA ORT 



CURSOS DE 

PROCESSAMENTO DE DADOS 



FORMAL AO DE PROGRAMADORES 
(COMPLETO) 

Durafao : 8 meses 

Horario: 2 a a 5 a feiia de 19:00 as 2200 hs 

MICROCOMPUTADORES E A 
LINGUAGEM BASIC 
Duraijao: 3 semanas 

Horario: 2 a a 5 a feira de 19:00 as 2200 hs 
Turmas de 15 alunos 



AMPLA UTILIZAQAO DO 
IBM-4341 E DO LABORATORIO 
DE MICROCOMPUTADORES 



Visite o CP D- ORT — Diariamente apos 
1300 hs — R. Dona Mariana, 213-Botafogo 
Rio de Janeiro “ Tels.: 226-3192 - 246-9423 




INTERFACES DO 8080/85 
MICROPROCESSADOR Z-80 
MICROPROCESSADORES 8080/85 
L0GICA DIGITAL I e II 
AMPUFICADORES OPERACIONAIS 



mmm teleprocessamento mam 

[tELEPROCESSAMENTO I - HARDWARE 
[TELEPROCESSAMENTO II - SOFTWARE 

■■■Mi BANANA-85MHBB 



MICROCOMPUTADOR PARA 
DESENVOLVIMENTO DE 
SOFTWARE E HARDWARE 
REVENDEDOR AUTORIZADO 



mm aulas prAticas com m m 

MICROCOMPUTADORES NACIONAIS 
KITS E LABORAT0RIOS DE 



ELETR0NICA DIGITAL 

• TURMAS COM 20 ALUNOS « 

CURSOS FECHADOS PARA EMPRESAS 



|AV. PRESIDENTE VARGAS 590/GR. 217 1 

^ RIO DE JANEIRO Tel. (021) 233-5239 J 
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COMPILADOR FORTH PARA Z80 



■Ad q i i f t - 



P a ra : t a j u d a- lot d i spb moa de: 

■— • M Id r6;'‘‘C.o m pytadores CP 
;**S&00«Cg 50§|Sist||Q0|4^ 
»\^a2Cr-TKT8^4 p | f 3^AXXI. 
^{Assessoria^aii-pr-ofissionais 
: Vi-libe r ais=e pequenas empreg 

is IMiMM 

— 0 melhor curso de BASIC 
^para\adultti^« criangas^ || 

*T- ; ,Sof twarefip llcativotenn j K-7 
’14 (C.P&QO $ 85) e diskette 
a , 4 (C.P.500) da MICRO IDEIA. 
— >Gravad o resVJimp re ssor as e 

■3§v Reembolso^ppddjp Brasil. 
Garahtimos^amelbor pregoe o 
meihQ^atendimenfefllsy^. 



MICRO IHM SI C()\l 
kt I’Ki.S. 1 I DA. 

R Vise, de Piraia. 547 S 
307 — Ipariema — Ceo 
22.410 — Tel 294-6248 
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O JP-01 6 um 
computador pes- 
soal para uso em 
pequenas e 
medias err>- 
presas que, 
por sua 
compatibili- 
dade com 
os sistemas 
e linguagens 
mais usados r 







*d forr Z 

°te Kit a j 



Av Presidente Vargas, 41 8, 1 6.° andar Rio de Janeiro - RJ 
Tel.: 253-0827 Telex 3421 3 PEDM-BR 










Com este programa, sua HP4 1 ou 41 -C estara pronta 
para the dar qualquer resposta em volts, ohms, amperes e watts. 



Eletronica na HP-41 

Pedro Ricardo Drummond 



E ste programa foi elaborado pa- 
ra estudantes, projetistas, en- 

fim, para todos aqueles que ne- 

' cessitam fazer, com frequenda, as ope- 
rates matemdticas que mesmo a eletro- 
* nica bdsica nos obnga a fazer. 

Uma vez inserido na mem6ria da HP- 
41 , o programa estara pronto para ser 
rodado, bastando apertar as teclas XEQ 
ALPHA ELETRON ALPHA. Feito isso, 
ele comeijard a perguntar a exatidSo re- 
querida nos calculos, ou seja, o nume- 
ro de casas decimals com que se quer 
trabalhar ; e so responder e apertar R/S. 

A partir dai, as teclas superiores da 
calculadora (£+, 1 /X,VX e LOG) pas- 
sam a valer para os calculos e,no modo 
USER, come?am a operar como VOLTS, 
OHMS, AMPERES e WATTS, respecti- 
vamente. Desta forma, inserindo dois 
dados quaisquer na maquina, teremos 
imediatamente os outros dois. 

Por exemplo, suponhamos que temos 
uma lampada incandescente de 100 
watts ligada a rede de 110 volts funcio- 
nando apTOpriadamente e queremos sa- 
ber a resistenda eletrica de seu filamen- 
to. Teclamos 110 VOLTS (110 e 2+) 
como primeiro dado e 100 WATTS (100 
e LOG) como segundo dado ; apertamos 
OHMS (1/X) e teremos o resultado de- 
sejado no visor: 121 OHMS. 

Se teclarmos AMPfiRES (VX), te- 
remos o outro resultado, ou seja, a 
corrente: 0,909 A. O programa trabalha 
tentando as fdrmulas possiveis atd en- 
contrar a ideal, a que utiliza os dados 
inseridos. 



Vamos ver outro exemplo. Temos 
urn resistor de 4700 ohms submetido a 
uma ddp de 12 volts e queremos saber 
qual a sua dissipaijao em watts. Pois 
bem, ja temos o programa na calculado- 
ra; teclamos XEQ ALPHA ELETRON 
ALPHA e aparecera no visor: EXATI- 
DAO? Vamos supor que queremos o re- 
sultado com uma predsao de tres casas 
depois da virgula; apertamos 3 e R/S pa- 
ra continuar o programa. Com isso, apa- 
recerd no visor 3,000, que 6 a prova de 
que ja temos as tres casas desejadas. 

Em seguida, entramos com 4700 e, 
como se trata de uma resistenda, ado- 
namos 1/X (correspondente a OHMS), 
depois 12 e £ + (correspondente a. 
VOLTS). Pois bem, jd temos dois dados 
inseridos e agora poderemos pedir qual- 
quer outro. Como queremos saber a po- 
tencia dissipada, pressionamos a teda 
LOG (correspondente a WATTS) e te- 
remos no visor 0,031 W, que represen- 
ts o resultado no formato pedido (tres 
casas decimals). 

INFORMAQOES complementares 

O leitor que tern o sadio hdbito de 
analisar os programas publicados para 
ver como a coisa fundona, pode ter fica- 
do na ddvida quanto & razAo de ser da 
funfdo SF 25 que liga o FLAG 25 — li- 
nhas 9,21,33,45,78,85,97 e 105 da lista- 
gem. 

A explica^To € simples: sem ela, a cal- 
culadora interromperia os cdlculos a ca- 
da vez que tivesse que efetuar uma di- 
visSo por zero, mostrando no visor sua 



mensagem de erro DATA ERROR. Te- 
mos que prever este tipo de coisa, uma 
vez que vamos fazer a maquina testar 
fdrmulas que podem, a princi'pio, nao 
nos servir. 

O leitor notard tambdm que, a cada 
dado msendo ou fomeddo, a mdquina 
emitird um beep que, se nao desejado, 
bastara retirar do programa as linhas 17, 
29, 41 e 53. Outra coisa: as linhas 15, 
27, 39 e 51 sSo formadas pela funfao 
APPEND (SHIFT XEQ em modo AL- 
PHA), seguidas de um espa £0 em branco 
e das respectivas letras. Sendo assim te- 
remos como resposta, usando o segundo 
exemplo, 0,031 W e ndo 0,03 1W. 

Apenas como sugestSo, seria conve- 
niente que se fizesse o ASSIGN (fun $26 
da mdquina que permite ao usuirio defi- 
nir teclas com as fiuupOes que lhe con- 
vier) da funfffo CLRG (fun£ao que lim- 
pa todos os registradores ou memories 
de dados disponiveis) na tecla LN e a 
executasse apds cada opera^To realizada, 
de modo a evitar interferences de dados 
de operates anteriores, o que poderia 
nos fomecer resultados erroneos. 

Podendo mesmo ser rodado na HP- 
41 C, sem nenhum mddulo de memdria 
adicional, acreditamos ser um programa 
muito conveniente, principalmente pela 
economia de tempo propordonada. 



Pedro Ricardo Drummond estuda Engenharia 
Eletrdnica na Universidade Mackenzie. Entre 
outros, id fez os cursos de Projetos de Circui- 
tos Eietrdnicos, Sistemas Digitais. MicroPro- 
cessadores Z8Q e 8080/8085 e Fibras Opticas. 
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81*LBl "ELETRON" 




Calculos em Eletronica 




182 / 


02 "EXftTIIifiO?” 


27 "F OHKS 


52 flVIEH 


77 RTN 


183 X*0v 


83 PfiOHPT 


28 fiVIEW 


53 TONE 8 


78 3F 25 


104 RTN 


04 


29 TONE 8 


54 CLX 


79 RCL 81 


105 SF 25 


05 CF 29 


38 CLX 


55 RTN 


86 Xt2 


i96 RCL 84 


0b FIX IBS X 


3! RTN 


56+LBL Bi 


81 RCL 84 


187 RCL 61 


ye SiO* 


32+LBL C 


57 RCL 82 


82 / 


108 / 


88*LBL ft 


33 SF 25 


53 RCL 93 


83 X*8? 


189 RTN 


39 SF 25 


34 X=8? 


59 * 


84 RTN 


110+LBL 04 


13 X=0? 


35 XEQ 93 


68 


85 SF 25 


11! RCL 03 


11 XEQ 01 


36 STO 03 


61 RTN 


86 RCL 94 


112 Xt2 


12 3T0 01 


37 CLR 


62 RCL 02 


87 RCL 83 


113 RCL 02 


13 CLfl 


38 AECL 03 


63 RCL 0« 


88 Xt2 


114 * 


14 flRCL 31 


39 *F fi“ 


64 * 


89 / 


115 X*0? 


15 'F V 


40 fl¥ I Eh* 


65 SQRT 


*8 RTN 


116 RTN 


16 AVI EM 


41 TONE 8 


66 x*e? 


9i*L8L 83 


117 RCL 61 


17 TONE 8 


42 CLX 


67 RTN 


92 RCL 81 


118 Xt2 


13 CLX 


43 RTN 


68 RCL 04 


93 RCL 92 


119 RCL 92 


19 RTN 


44*LBL D 


69 RCL 83 


94 / 


128 / 


28+LBL B 


45 SF 25 


78 / 


95 X*8? 


121 X*8? 


21 SF 25 


46 X=0? 


71 RTN 


96 RTH 


122 RTN 


2c X=9? 


47 XEQ 84 


72+LBL 82 


97 SF 25 


123 RCL 01 


23 m 02 


48 STO 04 


73 RCL 01 


98 RCL 64 


124 RCL 83 


24 STu 8z 


49 CLfl 


74 RCL 83 


99 SQRT 


125 * 


25 CLfl ' 


58 flRCL 84 


75 / 


108 RCL 02 


126 RTN 


26 flRCL 02 


51 “F W 


76 X*8? 


181 SQRT 


127 ENB 

A 



MEMPHIS e 

Central em suprimentos para informatica 

Para a sua empresa que tem necessidade de um fornecimento ininterrupto de su- 
primentos para a Area de processamento de dados, exist© a Central de Suprimentos 
da Memphis. Industrializando e distribuindo produtos para informatica a Memphis 
constitui-se hoje na alternativa mais confiAvel devido ao know how acumulado du 
ranle seus 13 anos de atividades, o que assegura A sua empresa o excelente desem 
penho dos produtos Memphis. AlAm disso, 
onde vocS tem a comodidade de encontrar 
no mesmo local todos estes produtos: Fitas 
MagnAticas, Cassetes, Discos, Diskettes, Disk 
Packs, Etiquetas, Datas Cartridges, Mesas | 'jl |J| 

para Terminais e Impressoras, Pasta para ■ iiililflll 

FormulArios Contlnuos, Fitas Impressoras e 
Arquivos Modulados para Pastas. 

A MEMPHIS distribuidora exclusiva para o 
Brasil dos produtos Verbatim, langa agora 
Diskettes nacionais (produzidos na Zona 
Franca de Manaus) nos tamanhos de 51 / 4 ” e 
8” para todos os tipos de computadores. 

5 ANOS DE GARANTIA “DESCONTOS 
ESPECIAIS PARA REVENDEDORES 
AUTORIZADOS MEMPHIS’*. 

• Em fase de nomeagao de novos Revende- 
dores Autorizados Tel.: (Oil) 262-5332. 




VENDAS: Av. Arnolfo de Azevedo, 108 
AllVllftUIllSl Pacaembu PABX (Oil) 262-5577 

^ TELEX N9 (011) 34545. 

FILIAL RIO: Praia do Flamenge, 66 - cj. 1519 
Tels.: (021) 205-3849 e 225-3469 
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NOVIDADES / REPOSIQ0ES. 

1) 0 MICROCOMPUTAOOR NA PEOUENA EMPRESA - 40 Programas prontos e 

comentados p/TK8ZC - TK85 - CP200 - Carlos Lagrotta Filho .... 3 800 

2) APLICApfJES SORIAS P/TK82C e CP200 - Delia Lima 3 000 

3) APPLE II USER’S GUIDE - Poole 13 00 o’ 

4) BASIC PARA MICROS PESSOAIS - Pereira Filho 2 95o’ 

5) CP/M HANDBOOK WITH MP/M - Zaks 17 000’ 

6) ELABORAPAO, ANALISE E RACIONALIZAQAO DE FORMUlArIO - Pedroso . 1 ,50o' 

7) CRIANQA TAMBEM FAZ PROGRAMAS - Silva 1 .390 

8) GATEWAY GUIDE TO THE Zx81 AND Zx80 - More than 70 programs - 

Charlton 13.000. 

9) INTRODUpAO AO VISICALC - Garbin 2.300 

10) INGLES P/PROCESSAMENTO DE OADOS - Galante 1 goo' 

11) MICROCOMPUTER ARCHITECTURE AND PROGRAMMING - Wakerly 15 00o’ 

12) ORGANIZApOES E METODOS - Cury 3 'l 0 o’ 

13) PROCESSAMENTO INTERATIVO: A LIMGUAGEM QE PROGRAMAQAO APL - 

Zimmerman 5 200 

14) PET FUN AND GAMES - Jeffries ’V.V.’.V.V.V.'.'V. is'ooo’ 

15) PROCESSAMENTO DE DADOS - Conceitos bdslcos • Shimizu 2 200' 

16) PROCESSAMENTO DE DADOS NAS EMPRESAS - Shimizu 4.000, 

1 7) PROGRAMApAO COBOL - Curse bdsico - Shimizu 2.100, 

18) PROGRAMApAO - codificag3o • testes - depuragSo de erros - documentagao - 

Alves - 1300 , 

19) 6502 ASSEMBLY LANGUAGE SUBROUTINES - Leventhal 13 000 

20) 6520 ASSEMBLY LANGUAGE PROGRAMMING - Leventhal 13 000 

21) TIMEX PERSONAL COMPUTER MADE SIMPLE - TiMEX/SINCLAIR 1000 . 3.800! 

22) TRS-80 EXTENDED COLOR BASIC - Haskell 15 000 

23) TRS-80 ASSEMBLY LANGUAGE SUBROUTINES - Barden ... 19 OOO’ 

24) YOUR SMALL BUSINESS COMPUTER - Shaw . . 12,500^ 

ATENDEMOS REEMBOLSO: CORREIO - VARIG - (lora capital) 
PEDIOOS: CAIXA POSTAL: 9280 - 01051 - SAO PAULO - SP 

Obs. : agora em nossas novas instalapOes, exposigSo permanente das 
principais editoras nacionais e estrangeiras. 

— visite-nos — 




• Se vocfi tem urn Sinclair ZX- 
80, ZX-81 , TK-80, TK82-C, NE- 
Z80, NE-Z8000 ou CP-200 e qui- 
ser receber um jornal com progra- 
mas, dicas a outras inform a^Ses 
complementares, voc$ sard bam 
recebido no Clube Nacional dos 
TK/NE/Sinclair, qua publics pe- 
riodicamente o boletim "Micro 
Dicas". Quern quiser participar do 
clube e s 6 entrar em contato com 
David Anderson, Micro Bits, Clu- 
be Nacional dos TK/NE/Sinclair, 
Cx. Postal 12464, CEP 04798, 
SP. 

• Texas TI99. Gostaria de entrar 
am contato com possuidores deste 
sistema para troca de informa^oes. 
Edmar Mattos, Rua Washington 
Luis, 477, CEP 79100, tel.: (067) 
382-8512, Campo Grande, MS. 

• Gostaria de trocar informapSes 
e programas na drea cornercial, jo- 
gos e software bdsico para todos 
os microcomputadores. Disponho 
de vdrios programas para a linha 
TRS-80 Modelo III. Tratar com 
Cldudio pelos telefones: (081) 
222-6673 a (081) 268-0444. Pra- 
Qa do Entroncamanto, 50/1002, 
Gragas, Recife, PE, CEP 50000. 



• Gostaria de fundar em Campi- 
nas um clube da usudrios de com- 
putadores Commodore (PET, 
CBM, VIC-20, C-64). Pertenpo ao 
TORONTO PET USERS GROUP 
e creio que a experidncia d dtima. 
Dr. Eduardo Chaves, Caixa Postal 
5631 CEP: 13100, Campinas, SP, 



• Possuo um NE-Z8000 e gosta- 
ria de entrar em contato com os 
usudrios do TK/NE/Sinclair para 
troca de iddias e programas. Quern 
estiva r interessado escreva para 
Luciano Fernandes, Rua Pero 
Correa, 291/41, Bairro Itarard, 
SSo Vicente, Sffo Paulo, CEP 
11300. 

• Gostaria de entrar em contato 
com usudrios do TK82-C e NE- 
ZSOOO para troca de programas, 
prjncipalmente jogos. Josd Rober- 
to Canto, Rua Bruno Lima, 110, 
Florianbpolis, SC, CEP 88000. 

• Gostaria da entrar em contato 
com pessoas que tenham o Apple 
14 para trocas de programas tan- 
to da drea cornercial como jogos. 
Carlos Alberto Jahara, tel.: (Oil) 
211-2491, SP. 



CHEGA V axJEL. 

de f X® (r^ 

PROBLEM AS f ^ 

Use Tig Loader 0 

TIG-LOADER possibilita: 

• a local izag 5b do 6timo volume do gravador, atraves de 2 LEDs Indica- 
dores, facilitando a operagSo LOAD. 

• DUPLICAR qualquer programs, mssmo aqueles "fechados", que 
n3o admitem as instrugbes SAVE e LIST. 

• carregar (LOAD) e DUPLICAR simultaneamente. 

• gravar (SAVE) em 2 gravadores ao rnesmo tempo. 

• monitorar as operacxfes LOAD, SAVE ou DUPLICAgAO atravfc 
de fone, scm manipular flos, plugs ou o contrble de volume. 

• filtrar as interferencias eldtricas de baixa frequAncia, que sffo 
a causa da maioria dos problemas de LOAD/SAVE. 

TIG-LOADER 6 pequeno (8 x 5 x 2,5cm) e nffo requer modificag<?e$ 

no microcomputador, nem bloqueia a expansgo de memdria. 

APENAS: CrS 72.000,00 



Monde cheque nominal juntamente com seus dados pessoais: nome , 
endereqo, profissSo, data de nasdmento, e voce o receberd peio Correio. 



CONSUL TE-NOS SOBREAPLICA TIVOS. 



TIGRE COM. DE EQUIP. P/ COMPUTADORES LTDA. 
Rua Correia GalvSo, 224 
CEP 01547- SSo Paulo - SP 






NA PAGINA 
No ntimero 20 



28, figura 2, ult. 
linha, prim. col. 



if 



ondeselE leia-se 





ATENDEMOS SOMENTE POR CARTA 



Prazo de Entrooa: 15dia« 
Despwai pot eonta do comprador 



71 , 2? col., 1? linha 


termina a lista 


termina a linha 


71,3a col. ,39 parag., 
6? linha 


deuma varia'vel 
numerica 


de uma cadeia 
numerica 


72,29 para'g.,9? linha 


uma variavel 
numerica 


uma cadeia 
numerica 


72,69 par^g.,2a linha 


para bin^rio em 
ASCII 


de binario para 
ASCII 


73,1? col., tilt, par^g., 
7? linha 


16552,237 


16562,237 


74, linha 01 10 


40EGH 


40E6H 
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SOFTWARE 

• Vendo ou trooo program as pa- 
ra as calculadoras programdveis 
TI--58/59. TamMm fapo progra- 
mas sob ancomendas e envio jb 
graved os dm cartffo magndtico 
com listogem completa. Djsponho 
da program as dejogos tais como: 
Senha, Genius etc. Fdbio Fran- 
cisco de Paula, R. das Palmairas, 
342, ap. 31, CEP: 01226, Santa 
Cecilia, S3 a Paulo. 

• Vende-se ou troca-se progra- 
mas para os micros TK82-C, TK- 
85, CP-200 a 2X81. Tratar com 
Maurfcio Xavier, Av. Maria Coe- 
Iho Aguiar, Rua Particular n? 68, 
Santo Amaro, tel.: (Oil) 493- 
3322, SP. 

• Vendo ou troco programas pa- 
ra o TK82-C, CP-200 a NE-Z8000. 
Tratar com Renato Strauss. Rua 
Cardoso da Almeida, 654/32, CEP 
05013, S3o Paulo -SP. 

• Vendo ou troco aproximada- 
mente 150 programas {jogos e 
aplicativos). Tratar com Maurfcio 
Xavier, Av. Marla Coelho Aguiar, 
passagem particular, 68, CEP 
05805, SP, tel.: (011) 493-3322. 

EQUIPAMENTOS 

• Vendo TV de 13, Orion, co- 
lorida, sistema NTSC original. 
Ideal para monitorar microcom- 
putadores importados tipo TRS- 
80. Tratar com Silva pelo telB- 
fone: (Oil) 258-3520, SP 

• Vendo um Sinclair ZX 81 c/ 16 
K ao prepo de Cr$ 110 mil, ori- 
ginal do TK82-C; e tambdm um 
CP-200 (16K) ao prepo de Cr$ 
150 mil, ambos na caixa com to- 
dos os scessbrios e manuals ori- 
ginais. Motivo: comprei um CP- 
500. Tratar com Pedro, de 2? a 
6? , das 14:00 ds 17:00h, tel.: 
(011) 263-201 2, SP. 

a Compro NE-Z80/8000 ou ou- 
tro computador dessa classa, com 
baixa capacidade, usado, na confi- 
gurapao minima, para desenvolvi- 
mento em torno do mesmo, tais 
como: expensbes de m emir) a e 
hnguagem, modem, discador tele- 
fonico, som/voz, video a cores, 
disquetes e muitos outros. Dante' 
Eickhoff. Caixa Postal 68, CEP 
98910, Tr«s de Malo, RS. 

• Vendo micro NE-Z8000 com 
expansSo de 16 Kb. Julio Cesar 
M. Piccolo, Rua Seta de Setem- 
bro, 96, tel.: (016) 634-7219, Ri- 
beirffo Preto, CEP 14100, SP. 

• Vendo TK82-C com 16K de 
expansSo com slow e fast. Acom- 
panhe manual com o programa Si- 
con. TrBtar com Celso.Tel.: (011) 
241-7546. Sao Paulo, SP. 



• Troco NE-Z8000 com slow, 
safda para Joystick a expansKo de 
16K com oito jogos em cessete 
(Assembler). Aceito ofertas: J. P. 
Martins, Cx. Postal 28 CEP 
27200, Piraf, RJ. 

• Vendo TK82-C com expansSo, 
slow, joystick, gravador e progra- 
mas de xadrez e TK-MAN por 
Cr$ 100 mil; ou troco por um 
ATARI. Tratar com Roberto 
Tsuyoshi UjUe, Rua Thomaz Gon- 
zaga, 1 14, Liberdade, CEP 01 506 
tel.: (011) 35-4997, SSo Paulo, SP 

• Vendo uma Data-Entry Olivet- 
ti 523 com uma unidade de casse- 
te e uma unidade de fita 800 BPI. 
Tratar com eng? Fausto pelo tel.: 
(011) 257-6700, SP 

• Vendo micro CP-200 da Prolb- 
gica, na garantja, por Cr$ 160 
mil. Acompanha duas fjtas com 
jogos animados e os nbmeros 2,4 
e de 9 a 18 de Micro Sistemas. 
Tratar com Ney pelo tel.: (011) 
454-1900, Santo Andrb, SP. 

• Vendo TK82-C com expansKo 
de 16 Kbytes, joystick e 20 pro- 
gramas. Tratar com SimSo pelo 
tel.: (011) 287-5266 (depois das 
13 hs). 

• Vendo CP-500 com um dis- 
quete, modem 1 .200 bps e curso 
de BASIC por Cr$ 1 milhSo e 
200 mil. Tratar com Carlos pelo 
tel.: 717-7863, apbs as 19:00h. 

• Vendo calculadora HP-41CV, 
importada, sam uso, na embala- 
gem. com certificado de garan- 
tia, livros de instrupOes e bateria 
sobressalente, ao prepo de Cr$ 
210 mil. Cx. Postal 70033, CEP 
22420, RJ. 

• Vendo Impressora papal tbrmi- 
co Sinclair para TK82-C, Sinclair 
e Timex. Tel.: (021) 226-8089 
(noite) Jean-Pjerre. RJ. 

• Vendo ou troco por vfdeo- 

cassete nacional um microcompu- 
tador TRS-80, (modelo |) com 
48K de mambria e Interface de 
expansSo. Tratar com Edson tet.: ' 
(067) 383-5472, Cempo Grande, 
MS. i 



DIVERSOS 

* Compro numeros avu Isos ou 
colepSes da revista "POCKET 
COMPUTER NEWSLETTER". 
Cartas para Moisbs, Caixa Postal 
82, CEP 85.800, Cascavel, PR. 

• Compro os numeros 3, 4, 6, 7 
e 9 da MICRO SISTEMAS, desde 
que em bom estado. Marcos Joffo 
Morales, Av. Hildebrando de Li- 
ma, 1204, Osasco, SSo Paulo, CEP 
06000, tel .: (01 1 > 802-9769. 



INTERSOFT 



SOFTWARE 

• Programas especfficos para todas as 6reas. 

• Aplicativos: Folha de Pagamento - Contabilidade - 
Estoque - Controle Bancbrin - Contas a Pagar e 
Receber - Faturamento Integrado - Mala Direta - 
Cadastro de Cliente - Cadastro de Imbveis - Outros 

• Editor Assembler - Compiladores Basic e Cobol - 
Jogos 

CURSOS 

• Sistemas Operacionais: NEW DOS - TRS DOS - DOS 
e CP/M 

• Integrados a K BASIC - MBASIC - BASIC 
respectivamente 

• VISICALC 

SUPRIMENTQS 

• Disketes [5 1/”e 8'] - Formuterios 

• Fitas Impressoras - Fitas Cassete Digitais 

COMERCIALIZAgAO DE MICROS 

Tntersoft 

SISTEMAS E COM£f1CIO EM 
COMPUTACAO LTDA. 

I Avenida Brigadeiro Faria Lima, 1 462 - conj 2 A 
yTel.: 21 1-0371 / 21 2-8971 - Sao Paulo - SP. ) 




Oupa: estes mini vent iladores 
trabalham em silencio 



Produto nacional com tecnologia 



ROTROIM 



Estrutura ZAMAK — Baixo nfvel de ruido 
Buchas autolubrificantes — Durabilidade infinita 

MUFFIN XL - 1 5 watts 
Vol. de ar 54L/seg - Peso: 610 gramas 
Dimensbes: 120 2 x 39 mm 
SPRITE - 11 watts 

Vol. de ar 1 3L/ seg - Peso: 51 1 gramas 
Dimensoes: 79 2 x 42 mm 
WHISPER XL - 7 watts 
Vol. de ar 30 L/ seg - Paso: 488 gramas 

. Dimensoes: 1 19^ x 39 mm 

1 1 0 ou 220 V 

Corn pi eta linha de circu/tos 
integrados CMOS, 
memorias e 
mi croprocessadores 





VENDAS POR ATACADO 



TELERADIO 

TELERADIO ELETR0N1CA LTDA 

RUA VERGUEIRO, N? 3134 - CEP 04102 - FONE- 544-1722 
TELEX (Oil) 30926- VILA MARIANA - SAP PAULO 



I 
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Garanta precisao e rapidez na anotagao dos comunicados de seu proximo concurso de radioamadores. 




Um programa para 
radioamadores 

Arnaldo Mefarto 



ideia do desenvolvimento deste programa surgiu nu- 
ma conversa com um amigo (que, como eu, tambdm 6 

radioamador), durante a qual verificamos a dificulda- 

de que temos ao participar de concursos para radioamadores. 

Nestes concursos. principalmente no caso de contatos em 
telegrafia, s2o realizados inumeros comunicados onde vdrios 
dados devem ser anotados com precisao e rapidez. 

0 programa aqui apresentado armazena em memoria os da- 
dos obtidos em cada comunicado e, ao final do concurso, per- 
mite a impressao do relatorio final. No canto inferior direito 
da tela, ele apresenta a indica^do do tempo gasto na parti cipa- 
?ao do concurso, tempo este que e atualizadoa cada novo co- 
municado. 

O programa foi desenvolvido em BASIC, podendo ser pro- 
cessado nos computadores TRS-80 Models I e III, DGT-100, 
CP-500, D-8000 e outros sistemas compativeis. 

Para prooessa-lo sdo necessarios mais do que 16 Kb de me- 
moria. Porem, d possivel o uso do programa com 16 Kb atra- 
ves de modificagCes nas linhas 10 , que reserva espa^o para os 
comunicados, e 50109 que reserva espa^o para os caracteres. 
O espa<jo necessario deve ser calculado levando-se em conta 
que cada letra ocupa 1 byte. Assim, para o prefixo PY1EIR 
serao necessarios seis bytes; em mil comunicados, serao neces- 
sarios 1000 x 6 = 6000 bytes, considerando-se prefixos com 
seis caracteres. 



As variaveis utilizadas pelo programa sdo as segumtes: 

Q — horario do comunicado 
C$ - prefixo da estagdo 
S — reportagem enviada 
R — reportagem recebida 
D — numero do comunicado 
S$ — segundos 
M$— minutos 
H$ — horas 
ER$ — erro 

NC$ — nome do operador 
PX$ — prefixo do operador 
EN$— endere 90 do operador 
CE$ — cidade e estado 
CPS — CEP e pais 

Teste o programa em seu proximo concurso e boa sorte. 



Arnaldo Milstein Mefano 4 Bngenheiro Eletrdnico e possui mestrado em 
Eletrdnica pela UF RJ-Coppe. Atualmente trabalha na 4rea de Desenvol- 
vimento de Teste na Cobra Computadores a Sistemas Bras. Ltda. e 6 
professor da Universidade do Estado do Rio de Janeiro-UERJ. 
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Controle de Comunicados para Concursos deRadioam adores 



1 GOT 050000 

5 CIS 

6 REM ♦**************************-**###***#**** 

7 REM * D I MENS I ONAMEMT 0 DOS VETO RES DADOS * 

8 REM *********'*********#****#****************■ 

10 DIM (2< 1000) , C*( 1000) ,S< 1000) , R( 1000' 

20 D=0 

30 CLS : PPINT320, “ENT RADA DE DADOS" 

40 PRIMTai -40, "ENTRE COM OS DADOS NA SEGUINTE ORDEM 

= QTR - CALL - RST SEND - RST RECEIVE 

41 PRINT 
<42 D-D < 1 

4 3 PRINT" 6ISO NUMERO : ";D 

44 PRINT" MET10R I A DI5P0NIVEL PARA STRINGS : "i:PRlN 
T F RE < C® t ; “BYTES" 

■+5 PRINT: PRINT 

50 REM 44****44***44*44444444****4(.*.*44**44#*44 4<-*44444(-*444f-*** 

51 REM 44 EDIT RADA DE DADOS * 

52 REM *****4F********-*****4<.**4P4(-*#***44****.*.****4F 
40 INPUT "OTR" lOMD) 

70 INPUT" CALL" iC*(D) 

75 PRINT "RST - SEND DIGITE S 

7o PRINT" RST - RECEIVE - DIGITE P 
80 INPUT P* 

83 R=A3C<R$) 

85 IF R=82 OR R=83 GOTO 90 ELSE CLS*G0T075 
90 IF LEFT* < R*, 1 »=" F" THEN GOTO 110 
1 00 I MFUT " RST-SEMD " ; S ( D > 

102 1 INPUT " RST— RECEIVE " ; R < D ' 

104 GOTO 122 

110 INPUT" RST-RECEIVE" ;P(D> 

120 INPUT" RST-SEMD" JS(D i 

122 Cl.3: PRINT: PRINT: PRINT" QTR" , "CALL", "RST-S" , "RST 
-R" 

123 REM ****** DADOS MOSTRADOS NO VIDEO ****** 

124 A$=S TRIMS* I 54 , "*" > :PPINTA$ 

1 26 PRINT :PRI INTO (D! , C* f P i , 5(D) , R( D > : PRINT.: PRINT: PR 
I N TS7.E8 , STR I NG* 183." = " > 

1 2” 1 S’* =M I D$ I TIMES, 16,2) J M*=M ID* < TIME* , 13,2) :H*»MID 
*' TIME*, 10,24 

129 FRIMT3916, "TEMPO DE OPERACAO =” ? : PRI NTH* ; " H: 

" SMS; " MIN: ” ;S*;" SEE" 

129 PRINT39S30, "MEMORIA DI3P0NI VEL : 11 ; MEM i " BYTES 
L1VRES" 

1.30 ER*== “ X " :PR1NT3320, STRINGS* 63, ■«“ ) :PRINT3388, * 
SELECIONE UMA OP CAD : 

ERRO — y DIGITE ER 

FIM DE ENT RADA DE DADOS > DIGITE N 

CONTINUACAO ENTRADA DE DADOS APFET’E ENTER" 

131 REM ** VERIFICA SE EXISTE A CONDICAO DE ERRO *■ 



■ PR I NTH*; " H: 



DIGITE ER 
DIGITE N 
APERT’E ENTER” 



132 STOP 

140 IF LEFT*1ER*, 1 >="N" GOTO 8000 
150 CLS : G0T042 
8000 CLS 

1 0E00 PRINT: PR INT88, “ AO TERMINO DO PR05RAMA TODDS 
OS DADOS SERAO PERU I DOS" 

10005 PRINT 

10006 REM ****************************************. 

10007 REM * OPERADOR SELECIONA OPCAO DESEJADA * 

10003 REM *****************************.**.*.*.*****».* 
10010 PR IMTS2 12, "SELECIONE A OPCAO DESEJADA : " 
10020 PRINT" <1> > CON 

TINUACAO ENTRADA DE DADOS" 

10030 PRINT" <2> > imp 

RESSAO RELATOR 10 FINAL" 

10040 PRINT" <3> p r M 

DE PROGRAMA" 



10050 IriPUTM: 1FN 10RN>3 THEN 10000 
10060 IFN= 1 THEN30 

10062 IF M-2 THEN 10100 

10063 REM **** IMPRESS*" Du RELATOR 10 »*** 

10065 PRINT 2 PRINT " FIM DE PROGRAM* " ; END 
10070 L PR I NT: L PR I NT 

10100 LPR I NT" LOG FOR CONTEST" 

10101 LPRINT 

10110 LFPiN I " OI-ERrt I OH ORA : "sN'“* 

10111 LPRINT 

10120 LPRINT" CALL : "iPX* 

10121 L.PRIN1 

10130 LPRINT" OTH : "sen* 

10131 LPRINT 

100,0 LPRINT" CITY : s CE* 

10141 LPRINT 

10150 LPRINT" ZIP - COUNTRY : " ; CP* 

10151 LPRINT : LPR I NT: LPR I NT 

10160 LPRINT" ISTR", " CALL*, * RST-S " , " RST- P" 

10170 LPR1MTA* 

101 £10 LPRINT 
10(85 FOR 1=1 TOO 

10200 LPRINT CttK • , C*< K ,3< K ■ , R(F i 
10110 NEXT*. 

10220 GO T 06000 

10.100 REM ********* K********************** 

10301 REM * INICTALIZACAO DRIVERS DE 10 * 

10302 REM **************»#« 44***44*****»ni.***.*, »,***. 

50000 POKE 1=526,105 

50001 POKE 16527,B 

50002 X=USR<0) 

50001 REM ********** ***»44***.** *********** ** «******,, 

50004 REM * IHKIaLIZACAO MARCACAC TEMPO OPEPACA0* 

50005 REM *********#*#.*.**** ***.***.*.*.**» ******„.„ 

50010 POKE 1 iPj 1 , 0 

50011 POKE 16920,0 

50012 POKE 16914,0 
50015 CLS 

5001 6 REM ************** ****** * * ********** * ******* 

50017 REM * SERACAO EFFITOS DE TELA IHIC1AIS * 

5001S REM ***********-**.************.* ************** 
50020 PPIMTCHR*' 23 ! 

50030 PRINT" LOG DE CONTEST • RrtD tOAMAEOR" 

50040 FOR X- 1T0 1000: NEXT i 
5LTO5 0 CLS 

50100 CLEAR 250 

50101 DEFhTHA-F :F=STRTNGi<32. 12S> :A“CHP*( 141 i-FSTFI 

Mtit' 2, 131 > : Bs=A+A : C=I?4-B : D=C+C : E =d«-D+C+ A* CHR* ’ 

1°1 

50102 FOR v-0TO322STEP64:pRir-tT;jr ,E; :NEXT: PRINTd8«6 

.STRING* <64, 131) 5 ’ " 

50103 FuRY=3 t ?2T023#STE:P--frA:PRINT3< , p : ! NEXT s PRI NTA2 
72, STRING* (32,1 31 > ! 

50104 PRINT34B4, " CONTROLS DE LOG - CONTEST ■ i 

50105 PPINT34-63, " ARNALDO 14. MEFANO PY1-EIR" ; 

5010* FUR V=irO2O00:NEXTY 

5010^ REM ** RESERVA ESPACO PARA VARIAWE15 STRINGS 
** 

50103 CLS 

50] 07 CLEAR 6010 

50110 PRINT" ENTRADA DE DADOS DO OPERADOR DA ESTACA 
O" : PROFIT 

50111 RE(1 *************** ************************* 

50112 REM * ENTRADA DOS DADOS DO OPERADOR ESTACAO* 

50113 FEM ************** It**.*********************** 
50120 INPUT" NOME COMPLETO" INC* 

50130 INPUT" FREE 1 XO" "PXT 

50140 INPUT-EHDERECO < PUA E NUMERO I “ i ENt 

50130 INPUT" Ci DADE E ESTADO" i CE* 

50160 INFUT" CEP E PAIS": CP* 

50170 CLS : PRINT384, "VERIFI CACAO DOS DADOS" : FOR 
TO5140: NEXT: CLS 
50130 PRINT" NOME : " ;NC* 

50190 PRINT" PREP I XO i ";PX* 

50200 PRINT" ENDERECO : - TEN* 

50210 PRINT" C I DADE E E3TAD0 s “ ; CE* 

30220 PRINT" CEP - PAIS : ";CP* 

50230 PRINT: INPUT" OS DADOS ESTAO CORRETOS <5.'N>“SN 
* 

50240 IF LEFT* > N* , 1 >-"N” THEN50108 
50300 G0T03 





Existem a/guns recursos de programagao capazes de "esticar" 
memdrias (aparentemente) pequenas em micros TK, NE e CP-200. Vale a pena tentar. 



Pequenas mem6rias, 
grandes economias 

Renato Degiovani 



T odo proprietdrio de micros pessoais, mais cedo ou 
mais tarde, certamente enfrenta uma sdrie de proble- 

J mas causados pela pequena capacidade de membria 

RAM destes micros. Tais problemas podem se apresentar de 
vdrias formas: ou o programa n3o cabe na memoria, ou nJo ha 
espago suficiente para os calculos que o programa eventual- 
men te faria, ou nJo hi espago para um dado qualquer ser im- 
presso na tela. 

A repercussao de uma membria lotada pode ir, de simples 
mensagens de falta de espago (as vezes nem elas podem ser im- 
pressas), at <5 a ocorrencia de coisas estranhas, como o compu- 
tador entrar em “parafuso”, apagar tudo e, alguns segundos de- 
pois, impiimir aquele “kazinho” no canto do video (isso 
quando ele consegue sair do dito parafuso). 

0 manual do computador nos alerta para esse fato e atd su- 
gere que, nessa hipbtese, fagamos um “regime” no programa, 
eliminando as linhas de comentdrio (REM). Mas, se nao for o 
suficiente? Bern, ai 6 cada um por si. 

De qualquer modo, devemos levar em consideragSo que a 
membria RAM do computador possui um Umite ffsico para a 
gravagSo de dados, o qual pode ser atingido com muita facili- 
dade. Para que isso nao acontega, ou pelo menos para tentar 
evitar uma membria lotada, devemos adotar uma postura mais 
coerente com a capacidade do equipamento que estivermos 
udlizando. Em outras palavras, estruturar os programas, jd na 
primeira linha, tendo em vista uma ocupagdo racional da me- 
mbria disponivel. 

Uma ocupagao racional 6 possfvel desde que se conhega co- 
mo o sistema operadonal organiza, na RAM, os diferentes ti- 
pos de informagao, e ai uma boa olhada no manual de opera- 
goes pode ajudar muito. 

organiza^Ao da memUria 

Na figura 1 podemos visualizar como as coisas se passam 
num equipamento como o TK82-C, NE-Z8000 e CP-200, com 
uma membria de 1 , 2 ou 1 6 Kb . 



Cada byte armazenado no computador, seja da ROM ou da 
RAM, possui um enderego que vai de zero atb onde for deter- 
minado pela arquitetura da maquina. No caso especi'fico do 
TK e NE, os bytes correspondentes a RAM, ou seja, a memb- 
ria que pode ser manipulada pelo usudrio, inidam no endere- 



m«m5ria RAM 


byte contendo fJOh 

1 


VARIAVETS DO 
SISTEMA 


PROGRAMA 


ARQUIVO DE 
IMAGENS 


variAveis 




LINHA niGTTA-J 
DA + ESPACO f 


1 1 1 i i 



t i 



16384 16509 D-FILE VARS E-LINE 



r 


STACK DO 


RESERVA 


stack DA 


STACK 


ROT I NAS 


t 


CALCULADOR 


mAquina 


GOSUB 


USR 



I I I I I 

STKBOT STKEND PONTEIRO ERR-SP RAMTOP 

SP 



Figura 1 



NE 28000 


TK 82C 


CP 200 


D-FILE 


D-FILE 


MAP TELA 


VARS 


VARS 


VARS 


E-LINE 


ELINE 


LIDIGIT 


STKBOT 


PILFUN 


STKCOM 


STKEND 


PILFIM 


STKFIM 


ponteiro SP 


ponteiro SP 


ponteiro SP 


ERR-SP 


ENSP 


RETGSB 


RAMTOP 


RTP 


MENTOP 



Figura 2: Tabela de compatibiHdade de nomenclature 
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90 16384 e v9o atd o endere 9 o RAMTOP (primeiro byte ine- 
xistente). Para 1 Kb, RAMTOP tem enderego 17408; para 2 
Kb, 18432; e para 16 Kb, RAMTOP tem endere 90 32768. 
(Consulte, na figura 2, a tabela de compatibilidade entre as no- 
mendaturas do TK, NE e CP-200). 

Do enderego 16384 ao enderego 16508, estao as varid- 
veis do sistema. Esta area 6 utilizada pelo sistema opera cional 
(interpretador BASIC) e contdm algumas informagoes real- 
mente importantes e uteis na eiaboragSo e estruturagdo dos 
programas. 

O programa propriamente dito esta gravado do endere§o 
16509 a td o endere 5 o em D-FILE (este depende do tamanho 
do programa a ser rodado). Nesta area estSo gravadas apenas as 
linhas que compSem o programa, da forma como aparece na 
figura 3. 





by 


te - sign 

t 


ifl 

1 


'►byte + significative 
Lcatlvo 


I 2 bytes | 2 b^tes | ^ | 1 byte 


numero 

linha 




da tamanho do tcxto , ENTER/NEWLINE 

texto + ENTER/NEWLINE 



Figura 3 



Na prdtica, para uma linha de programa 1 REM TESTE, te- 
remos a seguinte organizagdo: 



enderego 
da RAM 


codigo 

gravado 


significado 


16S09 


0 


.... 


^ da linha (0 x 256 + 1) 


16510 


1 




1 




16511 


7 




L tamanho do texto + ENTER/NEWLINE 


16512 


0 




i (0 x 


25 6 + 7) 


16513 


234 




REM 




16514 


57 




T 




16515 


42 




E 




16516 


56 




s 


- texto 


16517 


57 




T 




16510 


42 




E J 




16519 


110 




ENTER/NEWLINE 


16520 






D-FILE 













Para o numero correspondente d linha, gravado em 2 bytes, 
o primeiro byte 6 o mais sigmficativo e deve ser multiphcado 
por 256. Para o tamanho do texto, o segundo 6 o mais impor- 
tante. Ao final de cada hnha aparecera o cddigo 118, indicati- 
ve de ENTER ou NEWLINE (de acordo com o equipamento). 
No manual de operagdes de seu micro existe a listagem com- 
pleta dos codigos e seus significados. 

Se o numero da hnha for alterado para 9999, que 6 o maior 
numero de linha possfvel, a RAM sera gravada da seguinte ma- 
neira : 



16509 


39 


16510 


15 


16511 


7 


16512 


0 


16513 


234 


16514 


57 


16515 


42 


16516 


56 


16517 


57 


16518 


42 


16519 

16520 


118 



h (39 x 256 + 15) =9999 



(0 x 256 + 7) =7 

REM 

T 

E 

S 

T 



E 

ENTER/NEWLINE 

D-FILE 



A primeira vista, pode parecer que o nhmero dado a uma li- 
nha nao influi na quantidade de memdria, jd que ele sempre se- 
rd gravado com 2 bytes. Se assim fosse, o numero 3 ocupana 
a mesma quantidade de memdria que o numero 3000, por 
exemplo. Pordm, nas instrugdes GOTO e GOSUB.o numero da 
linha aparece apds a instrugdo ou texto, sen do que, nesse caso, 
a gravado da RAM serd: 



1 GOTO 1 



16509 


0 


16510 


1 


16511 


9 


16512 


0 


16513 


236 


16514 


29 


16515 


126 


16516 


129 


16517 


0 


16518 


0 


16519 


0 


16520 


0 


16521 


118 



- 1 
- 9 



- 1 

ENTER/NEWLINE 



GOTO 

1 

n9 



Hd uma diferen 9 a fundamental na representagao de um nu- 
mero de linha quando ele aparece apds uma instrugao GOTO 
ou GOSUB. Isto se dd porque qualquer numero existente no 
programa (exceto o numero da linha) 6 gravado com sua re- 
presentagdo grdfica (1 byte por di'gito), mais um eddigo 126 
(indicativo de numero) e mais 5 bytes para o valor do numero. 

Para a hnha 1 GOTO 9999, a representagao ficard assim: 



VENDAS DE MICROCOMPUTADORES 



• DESENVOLVIMENTO 
DE PROGRAMAS 

• PROGRAMAS 
COMERCIAIS E DE 
ENGENHARIA 





A nossa de- 
monstragao 
e personalizada com 
orientagao, pacien- 
cia, cortesia e boa vontade. 
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^^^TORIZMICDIGIT^^^i 
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PEQUENAS MEMORIAS,GRANDES ECONOMIAS 



16509 


0 


16510 


1 


16511 


12 


16512 


0 


16513 


236 


16514 


37 


16515 


37 


16516 


37 


16 517 


37 


16518 


126 


16519 


142 


16520 


28 


16521 


60 


16522 


0 


16523 


0 


16524 


118 



- 1 
12 

GOTO 

9 

9 

9 

9 

n9 



h 9999 



ENTER/NEWLINE 



portanto, 1 GOTO 9999 possui 3 bytes a mais do que 1 GOTO 

Conclusao: se a numera^o adotada naslinhas for uma pro- 
gressSo grande (1000, 2000 etc, por exemplo) e o programa ti- 
ver muita instru^ao GOTO ou GOSUB, muito espaijo de me- 
m6ria estara sendo gasto desnecessariamente. 

RACIONALIZE O ESPA£0 

O computador permite alguns recursos com os quais pode- 
mos dirmnuir o espai?o ocupado pelos numeros. Existe a fun- 
$ao denominada VAL, por exemplo, cuja opera^ao e: operan- 
do = string. VAL faz calculos como se fosse uma expressao nu- 
m£nca, ou seja, fomece o valor de uma determinada string. Se 
esta finnjao for aplicada na linha 1 GOTO 9999, a RAM sera 
gravada : 




1 GOTO 


VAL 


16509 


0 


16510 


1 


16511 


9 


16512 


0 


16513 


236 


16514 


19 7 


16515 


11 


16516 


37 


16517 


37 


16518 


37 


16519 


37 


16520 


11 


16521 


118 



GOTO 

VAL 

l» 

9 

9 

9 

9 

tl 

ENTER/NEWLINE 



Como podemos ver, a fumjao VAL economiza 3 bytes na 
representagao de urn determmado numero. 

Frequentemente nos esquecemos de que a imagem apresen- 
tada na tela do video tambem tern que estar gravada na RAM. 
Este arquivo de imagens cornefa no endere$o em D-FILE 
e vai ate o endere^o em VARS. Neste espafo, o programa ope- 
racional coloca uma copia dos caracteres enviados a tela e pos- 
teriormente faz uma “leitura” para a geragdo da imagem. Os 
endere 5 os do inicio e do final do arquivo podem ser encontra- 
dos pelas fdrmulas: 

inicio - D-FILE - PEEK 16396 + 256 x PEEK 16397 

fim - VARS - PEEK 16400 + 256 x PEEK 16401 



0 arquivo de imagens e iniciado por um cddigo 118, segui- 
do de 24 linhas de impressao, tenmnadas pelo mesmo codi- 
go. Se o total de memdria disponivel for superior a 3 1/4 Kb, 
entao o arquivo ja tera gravado um espafo (codigo 0) para ca- 
da carater da linha (cada linha tem 32 caracteres), ocupando, 
portanto, 793 bytes (esta quantidade & fixa, n2o importando 
se for impressa apenas uma letra ou a tela toda). Para 1 ou 2 
Kb de mem6na disponivel, o arquivo nao grava os espa?os 
(isso para economizar memdria), sendo composto pelo codi- 
go 1 1 8 uncial e um cddigo 1 18 indicativo de final de linha para 
cada uma das 24 linhas, totalizando 25 bytes de arquivo. Des- 
ta forma, a quantidade de caracteres impressos dete rrrunard o 
tamanho do arquivo de imagens. 

Para um arquivo que, por exemplo, miciasse no endere?o 
1 6530, a RAM seria gravada: 



para 16 k de RAM 



Para IK de RAM 



16530 

16531 

16532 

16533 



118 

0 

0 

0 



D-FILE 



16554 

16555 



6 

0 



1? linha 



118 


D-FILE 


ne 


19 linha 


118 


29 linha 


118 


39 linha 


118 


249 linha 




VARS 



16563 

16564 

16565 



118 

0 

0 



29 linha 



17320 

17321 

17322 

17323 



0 

0 

'118 



249 linha 
VARS 



portanto, quando se dispoe de pouca memdna, a formatafao 
da tela de video toma-se de vital importancia para a ocupafao 
racional da RAM. 

Com rela^So a um programa que objetive a impressao de um 
dado qualquer, a grava^ao da RAM sera: 



1 PRINT "ALO" 



16509 


0 


16510 


1 


16511 


7 


16512 


0 


16513 


245 


16514 


11 


16515 


38 


16516 


49 


16517 


52 


16518 


11 


16519 


118 


16520 


118 


16521 


38 


16522 


49 


16523 


52 


16524 


118 


16525 


118 


16526 


118 


16527 


118 



I 

7 



A 

L 

O 

ENTER/NEWLINE 

D-FILE 

A 

L 19 linha 
O 

29 linha 
39 linha 
49 linha 



PRINT 



Se quisermos imprimir este mesmo dado numa posifao qual- 
juer da linha, usando a fungfio TAB, teremos a gravaffo con- 
:orme a figura 4. 
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1 PRIN’ 


F TAB 8; 


"ALO ” 


16509 


0 


- 


1- 1 


16510 


1 






16511 


16 




- 16 


16512 


0 






16513 


245 




PRINT 


16514 


194 


TAB 


16515 


36 


8 


16516 


126 


n9 


16517 


132 






16518 


0 






16519 


0 




- 8 


16520 


0 






16521 


0 






16522 


25 




• 


16523 


11 


" 


16524 


38 


A 


16525 


49 


L 


16526 


52 


0 


16527 


11 




16528 


118 


ENTER/NEWLINE 


16529 


118 


D+FILE 


16530 


0 


coluna 0 




16531 


0 


coluna 1 




16532 


0 


coluna 2 




16533 


0 


coluna 3 




16534 


0 


coluna 4 




16535 


0 


coluna 5 




16536 


0 


coluna 6 


— 19 linha 


16537 


0 


coluna 7 




16538 


38 


A 




16539 


49 


L 




16540 


52 


O 




16541 


118 






16542 


118 


29 linha 



Figura 4 



£ predso lembrar que, quando a memona disponivel e 16 
Kb, todas as colunas, de todas as linhas, ja conterao o carater 
“espafo”. Isto significa dizer que o dado pode ser impresso em 
qualquer posi$ 2 o sem alterar a quantidade de memoria utiliza- 
da. 

Se desejarmos espago entre as bnhas de impressao, isto e, 
pular linhas, o programa pode ser escnto de tres formas dife- 
rentes (veja a figura 5 ). 

Estes tres programas produzem o mesmo resultado: impri- 
mir a string “ALO” no ini'cio da segunda lmha. Mas cada um 6 
estruturado de um modo diferente, ocupando mais ou menos 
espa<jo da RAM. 

A fumjao VAL pode ser igualniente usada para reduzir o 
e spa 50 ooupado pelos numeros. Entretanto, deve-se levar em 
conta que todos os itens a serem impressos devem estar em 
uma mesma linha de programa. Deste modo, 

1 PRINT “A” 

2 PRINT “B” 

3 PRINT “C ” 

deve ser escrito: 1 PRINT “A”, “B”, “C”. 

Radonalizar espa^o e um habito de grande utihdade que 
pode nos salvar de ocasiOes dificeis. TambfSm e bom lembrar 
que programas menores ocupam menos espai^o do arquivo em 
cassete e, portanto, gravaijOes menos demoradas. 



Renato Degiovani 4 formado em Comunicagao Visual a Desenho Indus- 
trial pela PUC-RJ e Professor de Fotografia nesta mesma Universidade. 
H4 mais de um ano utilize o NE-Z8000 para cdlculos na dree em Qua 
atua. 



PRINT 

PRINT 



16509 

16510 

16511 

16512 

16513 

16514 

16515 

16516 

16517 

16518 

16519 

16520 

16521 

16522 

16523 

16524 

16525 



'ALO" 

0 

1 

2 

0 

245 

118 

0 

2 

7 

0 

245 

11 

38 

49 

52 

11 

118 



1 PRINT AT 1,0; "ALO" 



1 PRINT , , "ALO " 
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16511 


24 
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— 




“ 2 16512 


0 




16 512 


0 
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16513 


245 




PRINT 16513 


245 






PRINT 16514 


193 




AT 16514 


26 




_ 


ENTER/NEWLINE 16515 


29 
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38 
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49 
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PRINT 16520 


0 
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28 




0 








O 16524 
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ENTER/NEWLINE 16526 
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38 
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49 
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52 
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16535 


11 




" 






16536 


118 




ENTER/NEWLINE 





1 

9 

PRINT 



ENTER/NEWLINE 



Figura 5 
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com o cabegote alinhado fora do azi- 
mute. Mande-o para urn t^cnico de 
confianga para que realize o realinha- 
mento das cabegas. Outra opgao 4 
comprar um gravador de qualidade su- 
perior que, de preferencia, suporte fi- 
ta de metal. A fita cromo exige um 
gravador especial. 



Pergunta — Tendo a oportunidade de 
comprar um micro nos Estados Unidos 
e nSo' tendo a quern recorrer senao a 
MICRO SISTEMAS, gostaria de terin- 
formagdes a respeito do micro Timex 
Sinclair lOOO.quais as posst'veis expan - 
sdes e peri fdri cos? Terei atgum proble- 
ma com a geragao de imagens na TV? 
(Diom’sio Silva Jr ., MG ) 

MICRO SISTEMAS - 0 Timex 1000 
possui expansoes de memdria e impres- 
sora. Quanto 3 geragao de imagens, as 
dificuldades resumem-se na diferenga 
do sisteina de transmissao americano 
com o nosso sistema, necessitando que 
voce providencie a conversao da TV 
brasileira para o sistema americano. 

Pergunta — Ao adquirir a unidade de 
disquete da Digitus para o DGT-WO, 
a interface vem inclu/'da? Onde posso 
adquirir por reembolso o Manual de 
BASIC e a fita? 

(Renato Nogueira Mendes, RJ) 

MICRO SISTEMAS — A interface nao 
faz parte da unidade de disquete. O 
Manual de BASIC e. a fita fazem parte 
do equipamento. Se ao recebero com- 
putador voce n2o encontrar o Manual 
e a fita, faga um comunicado a quern o 
vendeu ou a prdpria Digitus. O endere- 
go da Digitus Ind. Com. Serv. Eletro- 
nica Ltda. 4 Rua Gavea, 150, Jardim 
America, CEP 30000, Belo Horizonte- 
MG. 

Pergunta — Como se reserva espago de 
memdria para uso de rotinas em lin- 
guagem de maquina em um programa 
em BASIC? Por exemplo: no programa 
"Fdrmu/a 1" publicado em MICRO 
SISTEMAS n° 16, para executar o 
programa d necessa'rio responder PRO- 
TEGER com determinado numero. Is- 
so 6 muito inconveniente, pois se o 
computador jd estiver ligado terei que 
desligd-io quando surgir PROTEGER 
para poder reserva r a area. Se na linha 
2 tivesse uma instrugSo de reserva seria 
muito mais prdtico. 

Gostaria tambdm de saber como de- 
sativar o comando CSAVE no DGT- 
100 . 

(Josd Carlos Taveira, MG) 

MICRO SISTEMAS — Para proteger 
ou reservar uma 3 re a na memdria para 
rotinas em linguagem de maquina use 
o POKE para colocar na posigao 




16561 o byte menos significativo do 
enderego, e na posigao 16562 o byte 
mais significativo do enderego. Com 
relagao $ materia "Fdrmula 1", de- 
senvolvida para o D-8000 e publicada 
em MS n9 16, se voce quiser informa- 
goes adicionais sobre como reservar es- 
pago de memdria para uso de rotinas 
em linguagem de miquina no D-8000, 
leia o artigo "A Fungao do USR (X) 
no D-8000”, publicado em MS n9 17, 
pcigina 20. 

Desativar o comando CSAVE 4 im- 
possfvel. Se voce deseja proteger o 
programa contra copias, o que pode 
ser feito 4 armazenar o programa em 
um d isq uete e usar o co mando ATT R I B 
para definir o programa como apenas 
para execugao. 

Pergunta — Com as fungoes que o mi- 
cro TK82-C dispoe no teclado, qua/ 
delas eu poderia substituir no lugar de 
uma fungao: SET; DATA; RESTORE; 
DEF FN; ELSE; e o que vem a ser e 
para que serve o si'mbolo @ ? 

Mais uma coisinha: eu uso para ar- 
mazenar meus programas uma fita cas- 
sete Scoth C45, normal. Mas dois me- 
ses ap6s a gravagao, a fita fica ruim e 
suja muito o cabegote do gravador. Pa- 
ra que o som saia bom d necessa'rio for- 
gar a tampa do gravador para fora. As- 
sim, tenho que regravar meus progra- 
mas period icamente. Tentando resol- 
ver, comprei uma fita Scoth cromo. 
Resultado: nao gravou nem 50 % em re- 
lagao a Scoth normal. Por que? O que 
fazer? Como fazer? Que fita devo com- 
prar e como conservar a fita? 

(Amauri Pereira Lucio, SP) 

MICRO SISTEMAS — Voce n§o pode- 
r$ implementar novas instrugoes no 
seu TK82-C pois o interpretador BA- 
SIC estd gravado permanentemente na 
memdria EPROM. As instrugoes 
READ e DATA poderSo ser simuladas 
atravds da utilizagSo de uma matriz. 

O si’mbolo @ chama-se "arroba”. 
Em alguns Assemblers este sfmbolo 
serve para indicar que o numero que o 
segue 4 um enderego de memdria. Por 
exemplo: @ 17FB quer dizer enderego 
de memdria 17FB (hexadecimal). Em 
alguns BASICs este si'mbolo 4 utiliza- 
do como mascara de formatagao nas 
instrugQes PRINT USING. 

Com relagao ao problema de grava- 
g3o, seu gravador provavelmente est2 




Pergunta — Gostaria de obter informa- I 
goes a respeito do computador pessoal j 
ingles Sinclair ZX Spectrum. Por meio I 
de re vistas especializadas estrangeiras j 
ja o conhego, mas possuo algumas du- \ 
vidas que somente voces podem me \ 
responder com seguranga: o ZX fun- 
ciona em UHF e no sistema de trans- j 
missao de cor inglds PAL, que nSo d ' 
compative / com o nosso sistema PAL- [ 
M. Existe alguma maneira de adapter j 
o computador ao nosso sistema, ou \ 
ao nosso televisor domdstico? 

A Timex jd comercia/iza nos EUA 
esse aparelho com o nome de Timex [ 
Sinclair 2000. O sistema usado neste j 
equipamento d o mesmo que o "pai" \ 
britanico, ou usa o sistema de cores ! 
NSTC? Em caso afirmativo de se adap- j 
tar tanto o computador como o apa- j’ 
re! ho de teievisao para uso aqui no i 
Brasil, onde poderei fazd-lo em Sao 
Paulo? 

(Marcelo Rodrigues Soares, SP) 

MICRO SISTEMAS - Segundo tive- i 
mos informagao, a transcod if icagao do I 
sistema PAL para o PAL-M 4 muito { 
cara. E preferfvel a adaptagao do Ti- ! 
mex, o ZX americano, que utiliza o 
sistema NSTC, e 4 bastante conhecido 
pelos t^cnicos brasileiros, principal- 
mente depois dos videocassetes no i 
mercado nacional. Uma boa forma de j 
voce saber quais as empresas que faz- 
zem a transcod if icagao para o PAL-M ( 
£ consultar os classificados do Jornal ! 
"O Estado de S3o Paulo”, nasegao re- ) 
ferente 3 video-cassete e video-games. 

Pergunta — Gostaria de saber como d \ 
feita a manipulagao de arquivos no 
TK82-C. Caso esta nao seja poss/'vel, 1 
como posso fazer para simular a mani- '' 
pulagao de arquivos? 

(C/dudia N. B. Souza, RJ) \ 

MICRO SISTEMAS — A utilizagao de 
arquivos no TK82-C sd 4 posst'vel ope- j 
rando-se com matrizes. Voce define 
matrizes com a fungao DIM, armazena, j 
juntamente com o programa, em uma ; 
fita cassete comum, e quando desejar j 
uma consulta, 4 sd carregar o progra- 
ma. £ importante observar que apdso 
carregamento do programa n§o deve-se 
usar o comando RUN, mas sim GOTO 
X, ou seja, GOTO e o numero da li- 
nha. E o numero desta linha tern que 
ser o de uma linha do programa apds 
o comando DIM. 
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Sotugao recursiva, um programs BASIC e um microcomputador (no caso, o DGT-100): 

nao ha Torre de Hanoi que resists. 



Torre de Hanoi: 
uma solugao em BASIC 



Joao Henrique A. Franco 



ste artigo procura mostrar como podemos lmplemen- 
tar o principio da solufao recursiva em programas 

BASIC, utilizando como exemplo o problema da 

Torre de Hanoi. Em processamento de dados, Recursividade e a 
capaadade que determinadas Unguagens tem de permrtir que 
uma sub-rotina chame a si mesma sem esquecer o estado do 
processamento anterior. 

O problema da Torre de Hanoi consiste em transfenr uma 
pilha de n discos de tamanhos diferentes, ordenadamente, de 
um pino para outro. Apenas um disco podera ser movido por 
vez, sendo que um disco maior nao podera ser colocado sobre 
outro menor. Um terceiro pino 6 utilizado como auxiliar (veja 
figura 1). 

Chamando os prnos de A, B e C, e numerando os discos de 
Ian em ordem crescente de tamanho, nosso problema se resu- 
me em transferir a pilha com os discos do pino A para o pino 
C com o minimo de movimentos possfvel. Se tivessemos um 




umco disco, a solu^ao sena simplesmente mover o disco 1 do 
pmo A para o pino C. Para dois discos, moveriamos micial- 
mente o disco 1 de A para B, em seguida o disco 2 de A para 
C e finalmente o disco 1 de B para C. 

Generalizando, e facil concluir que a solu 9 ao para um pro- 
blema com n discos pode ser expressa, re curst vamente , em fun- 
^ao da solu^So com n-1 discos. Em outras palavras, seria equi- 
valente as seguintes solugdes (ou problemas, para os pessnms- 
tas): 

! 1) Transferir n-J discos 
do pino A para o pino | 
(usando C como auxiiiar) 

' £ 2t(n-l)-l movimentos J 

T rans fe r i r ji d i scos j 2) Transferir o disco p 
do pino A para o pino C. i do pino A para o pino _C 
(usando B como auxiliar) J £ 1 movimento ] 

[" 2+n-l movimentos T ! ,, _ , ... 

3) Transferir n-l discos 

i do pino B para o pino C 
i (usando A como auxiliar) 

i Q 2+(n-l)-l movimentos H 

E claro que poderiamos seguir nesta sequencia, colocando a 
solu 9 ao para n-l discos em fun 9 ao de uma outra para n-2 dis- 
cos e assim por diante, mas € rnuito mats interessante deixar 
que o computador fa 9 a isso para nos. 

Vale a pena lembrar que a solu 9 ao para o problema de n 
discos exige um minimo de 2tn-l movimentos. Assim, para 
n= 1 temos 2tl-l = 1 movimento; para n= 2, temos entao 
2T2-1 =3 movimentos. Pelo mesmo processo de indugao (fini- 
ta), verificamos que : 

{2+ (n- 1 ) ~ 1 } + {1} + {2+(n-1)-1} = 2+n-l 



O PROGRAMA DA A SOLU^AO 

A primeira listagem do programa — escrito em BASIC para 
o DGT-1 00 — niostra a simphcidade que a solu 9 ao recursiva re- 
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presenta. Um ponto importante a ser notado e o emprego de 
vanaveis indexadas (1$, AS, F$) em substituifao as vanaveis 
alocadas dinamicamente (normalmente em stacks), as quais s3o 
encoptradas em algumas Imguagens (Pascal, PL/M, FORTE 
etc.), menos em BASTC e FORTRAN. 

E facil ldcntificar (na linha 10) o programa principal, e nas 
Imhas 100 a 160 a sub-rotma recursiva. que e chamada tan to 
pelo programa principal como por si pr6pna, nas linhas 120e 
150. Esta sub-rotma fornece a solu^ao para o problema da 
Torre de Hanoi com n discos, reportando-se, sequencialmente, 
a sol 11930 com n-1, n-2,...l discos (taJ como foi exphcado an- 
teriormente). Seus parametros de entrada sao: 

N — Numero de discos a serem transfendos (tamanho da pilha) 
I$(N) — Pino micial (onde esta' a pilha) 

AS(N) — Pino auxihar 

F$(N) — Pino final (onde devera ficar a pilha) 

Assim, por exemplo, se quisermos transfenr quatro discos 
do pino A para o pino B (usando C como auxiliar), seus pa- 
rametros de entrada serao: N=4, I$(4) - “A”, AS (4) = “C” e 
FS(4) = “B”. 

Podemos entender agora o porque de utilizarmos vanaveis 
indexadas em lugar de vanaveis simples: os valores iniciais 
(bem como os seguintes) das vanaveis sunples senam perdtdos 
a partir da primeira auto-chamada da sub-rotma. 

Fehzmente o mesmo nao ocorre com a variavel N (numero 
de discos) que, por ser apenas mcrementada/decrementada por 
uma constante no interior da sub-rotma, pode ter enderefO 
fixo (ou seja, pode ser alocada estaticamente). Desta forma, e 
possi'vel empregarmos a variavel N para indexar as vanaveis 1$ , 
AS e F$ em cada nivel de chamada da sub-rotma. 

Na segunda listagem foram acrescentadas algumas facilida- 
des, como a utihza 5 ao repetitiva do programa para vanos tama- 
nhos de pilha (se n =0, o programa e interrompido), a indica- 
93:0 do numero minimo de movimentos e a numerafao e pagi- 
naijao dos movimentos em telas de 1 5 linhas. 



Progra maSim plifica do 

10 INPUT N : r$(N)= ,, A" : A$(N)="B" i F$(N)=”C" : G 
OSUB 100 : STOP 
100 IF N=0 THEN RETURN 

110 I${N-1)=I${N) : A$ (N-1)=F$ (N) : F$ (N-1) =A$ (N) 

120 N=N~1 : GOSUB 100 

130 N=N+1 : PRINT N, 1$ (N) , F$ (N) 

140 1$ (N-1) =A* (N) : A$ (N-1) =1$ (N) : F$ <N- 1 ) =F$ (N) 

150 N=N-1 : GOSUB 100 
160 N=N+1 : RETURN 

Programa Final 

5 REM 

10 REM TORRE DE HANOI 

15 REM (C) 1983 BEGIN INFORMATICA 

20 REM CAIXA POSTAL 1640 - 13100 CAMPINAS, SP 

25 REM 

30 CLS : PRINT TAB (16) "TORRE DE HANOI" : PRINT 
40 INPUT "numero de discos"} N : PRINT 
50 IF N=0 THEN STOP 

60 PRINT "numero de movimentos:" ; 2tN-l PRINT 
70 L=0 : M=0 : I* (N) ="A" : A$(N)="B" : F$(N)="C“ 

: GOSUB 100 

80 GOSUB 200 : GOTO 30 

100 IF N=0 THEN RETURN ELSE N=N-1 

110 1$ (N) =1$ (N+l) : A$ (N) =F$ (N+l) : F$ (N) =A$ (N+l) 

: GOSUB 100 

120 M=M+1 : PRINT M ; ".itiova o disco" ; N+l ; "do 
disco" ; 1$ (N+l) ; " para o disco" ; F$(N+1) 

130 L=L+1 : IF L=15 THEN L=0 : GOSUB 200 
140 I$(N)=A$ (N+l) : A$(N)=(N+1) : F$ (N) =F? (N+l) : 

GOSUB 100 

150 N=N+1 : RETURN H 

200 IF INKEY* =" " THEN GOTO 200 ELSE RETURN 



JoSo Hen rig uv de A. Franco 6 engenheiro eletrdnlco pola Esco/a Po- 
H tdcnica da USP e car sou o CEAG na Fundagao Getulio Vargas, na 
Area de MAtodos Quantitativos e informdtica. Atuaimente 4 Enge- 
nheiro do Projeto TROPICO-RC no CPqD da Teiebras. 
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EMBALAGEM MtjLTIPLO USO 

Os formularies Redifonn vem acondicionados em embalagens projetadas 
para proporcionar perfeita pro te^ao ao seu remteudo e fadmar o transpor- 
te, pois, sSo do tipo maleta. Outta van ta gem destas embalagens € a possibi- 
iidade do seu reoproveitamento como caixas arquivo, acondicionando o 
proprio formulano }& utilizado ou outros documentos. 

>")> S.Pauto :7?. Monte Alegre. 1.378 

IrvT'lk CEP 05014 - Telefones: 62-99 78 
VV / I 263-0263-263-1 71 0-263-3156 

I ^ I COMERClAl P P(P*C5ENTAC0CS LTBA Telex: (Oil) 39863 VCTR-BR 

R4e Janeiro : 4 v. Rio Branco, 123 - 13P - S/1310 - Tel: 224-1244 
Sanlp_Andre : Av. Portugal, 397 - 10? - S/ 1004 - Tel: 444-3084 



Kristian 



MICROCOMPUTADORES 



DGT 100 Cr* 240.000, x 3 — Gratis 18 jogos 

CP-200 Cr* 1 10.000, x 2 — Grails 6 jogos 

TK86 Cr* 89.925, x 2 — Gratis 6 jogos 

TK82-C Cr* 49.925, x 2 — GiStis 6 jogos 

ainda: UNITRON Ap II, Msm 84 K, 

Joystick, Impressoras, etc... 

(Pregos aujGitos a modificagOes) 



PRQGRAMAS PRONTOS EM FITAS 



JOGOS 




• VISITA AO CAISINO 

• MIDWAY 

• PASSAGEM PARA 

O INFINITO * 2.* DIMENSAO 

•10 JOGOS • JOHN ADA NAS 

EXCITANTES ESTRELAS 

PARA 1 K E MUITO MAISt 



JOGOS: 

• scarfman 

• PENETRATOR 

• SUPERNOVA 

• VIAGEM A VAIKYHIA 

• ASILO 1 

• AVENTURAS 

• DEFENSE COMMAND 

• E MUITO MAIS! 



r 4 i 7 LEASING 


E CREDITO DIRETO! : " 


LITEBATURA 


+ CURSOSDE BASIC 


• MICRO-SI STEM AS 

• INTERFACE 

• JORNALTK-CP 

• IMPORTADOS 


GRATIS 

NA COMPRA DE QUALQUER MICRO 



DESPACHAMQS PARA TODOO BRASIL! 



APLICATIVOS 

CONTROLE DE ESTOQUE 
CONTAS A PAGAR/HECEBER 
MALA DIRETA/CADASTRO 
FOV.HA DE PAGAMENTO 
VIDEO-CLUBES 
ESTATiSTICOS 

SOFTWARE SOB ENCOMENDA 



thPiananj 

^■■■CLETnONICA LTTlAr-^ 

Rua da Lapa, 120 Gr. 505 
Rio de Janeiro • RJ 
Tel.: (021) 252-9057 



































Curso de 
Assembler — VI 





EXEMPLO : 



LD (IY+17),127 (IY+17) 4 127 

Ciclos de tndquina (M): 5 
States (T): 19(4,4,3,5,3) 

Flags afetadas: Nenhuma 

Como exemplo, se o regjstrador IY contain o numero 
4200H, a instru9ffo LD (IY + 7), 64 resulta no armazenamento 
do byte 64 na posa£3o de memdria (4200H + 7). 

1 2 — Move memdria para o acumulador 
Formato: LD A,(BC) 

Opemqdo: Move o conteudo de uma posifao de memdria 
apontada por BC para o acumulador. 

Codigo objeto: 




LD ( I Y+9 ) , 43 

FD 
36 
09 
ZB 

Descri$ao: O operando n de 8 bits 6 carregado na posiffo 
de memdria dada pelo somatorio do conteudo do 
registrador IY com o deslocamento (d). 




Descrigao: O conteudo da po»93o de memdria apontada 
pelo par de registradores BC e transferido para o 
acumulador. 

LD A , ( BC ) A <4 (BC) 

Ciclos de maquina (M): 2 

States (T): 1(4,3) 

Flags afetadas: Nenhuma 

Vejamos um exemplo. Se o par de registradores BC contain 
o numero 4000H, e a pos^ao de memdria 4000H contdm o 
byte 5FH, entffo a instru9ao LD A, (BC) transfere o valor 
5FH para o acumulador. 
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1 3 — Move mem6ria para o acumulador 
Formato: LD A, (DE) 

Operaqao: Move o conteudo da poa^ao de meraoria apon 
tada por DE para o acumulador. 

Cddigo objeto: 

LD A , (DE) 



— i — i — i — i — i — i — i — 
0 0 0 1 1 0 1 0 

I I I — I — I — I — I — 



>• 1 A 



Descriqdo: O conteudo da posifSo de memdria apontada 
pelo par de registradores DE e transferido para o 
acumulador. 

LD A , ( DE ) A <4 (DE) 

Ciclos de maquina (M): 2 
States (T): 1 (4,3) 

Como exemplo, se o par de registradores DE contain o nu- 
mero 7146H e a posifSo de memdria 7146H contem o byte 
77H, entao a instrufao LD A, (DE) move o valor 77H para o 
acumulador. 



14 — Move memdria para o acumulador 
Formato: LD A, (nn) 

Operaqao: Move o conteudo da posjfao de memdria dada 
por im para o acumulador. 

Cddigo objeto: 



LD 



A , (nn) 



, 1 

0 0 1 

.L ... 1 . 


— i — i — i — i — 
110 10 

1 1 1 1 _ 


r l 


1 1 1 f 

r% fc. 


i i 


11 r 


◄ — 

-i i 


{fill 

- n ► 

l — i — i — i 



EXEMPLO; 



LD A , ( 37 E 8 II) 



> 3 A 



> E 8 
* 37 



Descriqdo: O conteudo da posiffo de memona especifica- 
do pelo par de operandos nn e carregado no acumula- 
dor. 0 primeiro n £ o operando de baixa ordem dos 
dois bytes que especificam o endere^o da memdria 
(observe o exemplo acima). 

LD A , ( 5000H ) A ^ (5000H) 

Ciclos de mdquina(M): 4 
States (T): 13(4,3,33) 

Flags afetadas: Nenhuma 

Como exemplo, se o conteudo do operando nn £ 7000H e a 
posicSo de memdria 7000H contdm o byte 44H, apds a instru- 
fffo LD A, (7000H), o valor 44H sera carregado no acumulador. 

1 5 — Move acumulador para memdria 
Formato: LD (BC), A 

Opemqdo: Move o conteudo do acumulador para a posifSo 
de memdria apontada por BC. 

» 



>: 


1 


— 1 — 
1 1 

1 


— 

0 

. 


1 

1 0. 

1 


1 

1 1 

E 


1 


l 

O 1 

1 


0 


0 0 


o 

o 


1 


1 1 

1 0 


1 


1 

1 1 
1 



COMPRE SEU MICRO CONOSCO. 

ipanema Micro surge com uma proposta dife- 
rente. Se vocS quiser comprar um micro, a gente 
vende. Mas f az questao absoluta de aconselhar o 
que for melhor pra voc£. N3o pra gente. 

Para nds, da ipanema Micro, atendimento 
personallzado 6 multo mais que uma frase de 
propaganda. £ um compromisso a ser honrado. 



E APRENDA A MEXER NELE. 



Voce sabe que um micro pode ajudar sua vida 
particular e profissional. Mas nao sabe como en- 
trar nesse mundo novo, ipa- 

nema _^^tfN^npi^Micro conduz voce 

pelos caminhos 
da informati- 
ca. Tudo nu- 
ma lingua- 
gem simples, pra 
voce entender de cara. 
Faca um curso Basic aqui com a 
gente. 




IranEmn fTlicno 

Uma boutique eletrOnlca com calor humano. 

Pague em ate 2 a nos. Leasing. Software. Computadores usados. 
Seu computador como parte de pagamento. 

Rua Visconde de PI raja, 540- lola 106-Tel.: 259-1516 
Telex: (021) 31107 - ipanema - Rio de Janeiro - RJ 




uma questao de capacidade 

Quando a capacidade e a versatilidade forem essenciais. sua escolha so pode 
ser DANVIC. 




Os computadores, DV-2000 e DV-600, sao compativeis entre si a nivel de 
disketes, Voce podera comecar com o DV-600, e quando a necessidade de 
expansao requerer mcdanqa para multi-usuarto/multi-tarefa com discos 
rigidos, voce podera trocar pelo DV-2000 sem nenhuma modificacao de 
software. Os dois modelos possuem softwere de comunicacao para 
computadores grandes (IBM, BURROUGHS, etc.) e poderao ser utilizados 
para consultas, transference de arquivos ou 5 jggfl{gsmente entrada de dados. 



EA/SOOO 

- Ate 2048 Kb em memorkt RAM. 

- Interface para impressoros Matncian ou tie li 
nba. 

- Interface para ole 
petefodos. 

- Interface para Unidade s 'Wirrcteiter’ ou CDC 
Pbenix de 32/96 Mb. 

- Interface para at& 8 terminals comuns e mor* 

1 5 terminate rnteJ/gentes. 

- Interface para unrdadc de fita, 

- Slrtema operational DV-DQS. CP/M 2 2 ou 
MPM II. 



- CPU Z‘80A em 2 ou 4 MHZ. 

- 64 JCh de memdria RAM. 

- 2 pertas RS-232 e I porta para Imprtstora pa- 
drdo Centronix. 



IJJbOO 



Stetemo operational DV-DOS SUPER (comp, 
com CP/M versdo 3.0), jo dtsponivel. 



at6 4 Unidades de Dlsketes de 8 pohgadas 
com CP/M. 



O AN VIC S.A. 



Sio Paulo R de Janeiro • (021)234-3(73, 

R. Conselheiro Nebias. 1409 CEP. 01203 - P. Alegre - (0512) 11-8711 ; 8. Horizonte 
Tei : (01 1)221-6033 Telex: 1123888. (031)201-7555. 
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CURSO DE ASSEMBLER - VI 



Codigo objeto: 

LD (BC) , A 



— | f , — | | | 1 — 

OOOOOOIO 

I I I I I I I 



► 02 



Fjescrigdo: O conteudo do acumulador e carregado na posi- 
$ao dc memona especificada pelo par de registrado- 
res BC. 

LD ( BC ) , A (BC)-^ A 



Em codigo de maquina, o pnmeiro operando neo en- 
derefo de mais baixa ordem. 

LD ( 4000H ) , A (A000H)-* A 

Ciclos de maquina (M): 4 
States (T): l 3(4 ,3 ,3 ,3 ) 

Flags afetadas: Nenhuma 

Como exemplo, sc o conteudo do acumulador e o byte 
7DH, apos a execugffo da mstrufao LD (3140H),A, o byte 
7DH sera transferido para o enderefo de memona 3140H. 



Ciclos de maquina (M): 2 
States (T): 7 (4,3) 

Flags afetadas: Nerihuma 

Um exemplo: se o acumulador content o byte 7AH e o par 
de registradores BC content 7000H, a instru^o LD (BC),A 
resultara na carga do byte 7AH na posi^ao de memona 7000H. 

1 6 — Move acumulador para memoria 

Formato: LD (DE), A 

Operando: Move o conteudo do acumulador para a posnjao 
de memona apontada por DE. 

Codigo objeto: 

LD (DE) , A 



1 1 ! 1 1 1 1 — 

0 0 0 1 0 0 1 0 
I I I — 1 — I — I l_ 



► 12 



Descrigao: O conteudo do acumulador e carregado na posi- 
$ao de memoria especificada pslo par de registradores 



DE. 



LD ( DE ) , A 



(DE) 4 A 



Ciclos de maquina (M): 2 
States (T): 7(4,3) 

Flags afetadas: Nenhuma 

Como exemplo, se o conteudo do par dc registradores DE 
c 4500H e o acumulador content 45H, a instru^ao LD (DE), A 
resulta na transference do byte 45H para a posi^ao de inemo- 

na 4500H. 



IS — Move registrador para registrador 

Formato: LD A, I 

Operagao: Move o conteudo do registrador I de 8 bits para 
o acumulador. 

Codigo objeto: 

LD A , I 



> ED 

> 57 



Descrigao: O conteudo do registrador de interrupt veto- 
rada I 6 carregado no acumulador. 

LD A, I A 4 1 



1 


1 


1 


— 

0 


— 

1 




1 

0 1 

1 1 


0 


1 


0 


1 


0 


1 


1 1 
\ 



Ciclos de Maquina (M): 2 
States (T): 9(4,5) 

Flags afetadas: S — Setado se o registrador I e negativo. Ca- 
so contrano ele e ressetado; 

Z — Setado se o registrador I e zero. Senao e 
ressetado; 

P/V — Content o valor de IFF2; 

N — Ressetado; 

C — Nao afetado. 

Como exemplo, se o vetor de interrupt 1 content o byte 
4AH, apds a execmjao dc LD A,1 o acumulador tambem con- 
tera 4AH. 



17 — Move acumulador para memoria 
Formato: LD (nn), A 

Operagao: Move o conteudo do acumulador para a posigao 
de memona apontada por nn. 

(Codigo objeto: 



LD 



( nn ) 



0 


(T 


— r — r 

1 1 


0 


r 

0 


1 0 




"T 


1 f 




1 


1 












.... 








— 


i 






| 


1 L 




L 




LD 




( 37E8H ) 


, A 


0 


0 


i r 

1 1 


0 


0 


1 0 | 


1 


1 


1 0 


1 


0 


o 

o 


0 


0 


1 1 

1 


0 


( 1 l 


i'll 
1 1 



> 32 

> E8 

> 37 



Descrigao: 0 conteudo do acumulador e carregado no en- 
dere$o de memoria especificado pelo operando nn. 



19 — Move registrador para registrador 
Formato: LD A,R 

Operagao: Move o conteudo do registrador R de 8 bits pa- 
ra o acumulador. 

Codigo objeto: 

LD A , R 



* ED 



► 5F 



Descrigao: O conteudo do registrador de refresh R e carre- 
gado no acumulador. 

LD A,R A 4 R 

Ciclos de Mdquina(M): 2 
States (T): 9(4,5) 

Flags afetadas: S — Setado se o registrador R for negativo, 
ressetado cm caso contrano; 

Z — Setado se o registrador R e zero, res- 
setado em caso contrano; 

P/V — Content o valor de IFF 2; 

N — Ressetado 
C — Nao afetado 



1 

1 1 

1 


— 

1 


0 


1 


1 


— 1 — 
0 1 

1 1 


JLil 


0 




1 




1 


1 


1 1 

\ — 
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Um exemplo: se o registrador de refresh R contem o byte 
4AH, apos a execu^ao de LD A,R, o acumulador tambe'm con- 
tera o byte 4AH. 

20 — Move registrador para registrador 

Formula: LD I, A 

Operagao: Move o conteudo do acumulador para o registra- 
dor I. 

Cddigo objcto: 



1 

1 1 
1„ , 


— 

1 




0 


1 


1 


— 

0 




1 


0 t 
1 


0 

__J 


0 


0 


1 


1 







Operagao: Move o conteudo do acumulador para o registra- 
dor R. 

Cddigo objeto: 

LO R . A 



1 — 

1 1 

1 


— 

1 


1 — 

0 1 


— i — i — 

1 0 t 

1 


0 1 
— 1 


0 


0 1 

L_ 


1 1 1 

— 1 1 



Descrigao: O conteudo do acumulador e transfendo para o 
registrador de interrupgao vetorada I. 



Ciclos de mdquina (M): 2 
Slates (T): 9(4,5) 

Flags afetadas: Nenhuma 

Como exemplo, se o conteudo do acumulador e o byte 
57H, apds a instrufao LD I, A, o registrador I tambe'm contera 
o byte 57H. 

21 — Move registrador para registrador 

Fnrmato: LD R,A 



Descrigao: O conteudo do acumulador e carregado no re- 
gistrador de refresh R. 

LD R , A R.4- a 

Ciclos de mdquina (M): 2 
States (T): 9( 4,5) 

Flags afetadas: Nenhuma 

Como exemplo, se o acumulador contem o byte 5AH, 
apos a execu^ao da instrucao LD R,A o registrador R contera’ 
o byte 5AH. 

_ Na prdxima aula vamos ver as instru?oes do Z80 que corn- 
poem o grupo de carga de 1 6 bits. Ate la. ■ 



■ Amaury Correa de Almeida Moraes Junior e formado pelo curso de 
And Use de Sistemas da FASP, tendo feito diversos cursos de aperfei- 
goamento nas areas de Eie tronica Digital e Microprocessadores. 

Amaury trabalha como Analista na PROD ESP, na drea de min i /micro- 
computadores, presta consultoria a empresas para a implanta(So de sis- 
temas de microcomputadores e dd aulas de Assembler na Sacco-Micro- 
computadores. Software e Hardware, em Sao Paulo. 







Com um investimento re/ativamente pequeno, 4 posst'vel para o arquiteto 
simplificar e agilizar o seu trabalho no TK82-C. 



Composicao de 
pregos unitarios — II 

Jos& Eduardo Maluf de Carvalho 



Esta € a continuafao do programa ComposigSo de Prefos Unitarios, que permite elaborar 
or5amentos para constru^ao civil. 0 programa permite fazer 271 composites de pre9os 
unitarios, seguindo a ordem padrSo de uma planilha quantitativa. 

Em virtude das limitates de memdria do sistema utilizado — o TK82-C, com 1 6 K — o 
programa foi dividido em duas partes. A primeira delas, publicada na edito n9 21 de 
MICRO SISTEMAS, abrange at 6 o item 12 (coberturas) da planilha padrao, 
num total de 1 36 composi9Ses de pre9os. A segunda parte, aqui publicada, 
cobre os itens restantes, perfazendo 135 composites. 



Precos Unitarios — If parte 



le REM "PREC05 U»IT«RI05” 

15 CLERR 
2® 3L.GI) 

2S PRINTT AT 9 V 2; “PRECOS UMiTFin 
105 — 2R, PRRTE*' 

3® PRINT RT ll.a; "PROGRftHfl DE5 
CNUOLUIDO PELO RRQUTTET O JOSE ED 
UPRDO HRLUF DE CflRyflLHO" 

40 PRU5E 190 . 

50 POKE 1643-7,255 
60 CLS 

62 PRINT RT '‘RNOTE QUANTO 

S E OUR IS SRO 05 ITEN5 QUE UOCE 
UR I U5RR NO PRGUEXO, PRRR ft SQMR 
TOAIR FINAL 1 ' 

63 PAUSE 160 

64 POKE 16437, 255 
66 CLS 

66 PRINT RT 9,2;“PReCOS BASE t> 
O MES DE JUNHQ DE 1963 ~ QRTN=18 
73 - 37” 

70 LET J=1873,37 

72 PRINT RT 12 , 2; "DZG3TE O- IND 

ICE DE RERJUSTC (ORTN OU 5IHDICA 
TOS DE CQN5TRUCAO - EX* : RERUUST 

E DE 50.66 PC - DIGITE 1 - SB S5S18 
73.37) ” 

74- INPUT H* 

76 CLS 

73 LET' Ks&ttv'O 
S3 D IH Ft 1137) 

90 DIM E5 \ 137,26; 

9S FAST 
100 LET C=0 
110 FOR C=1 TO 137 

120 LET B% i 11 ="1-DEM DE FUND M3 



12 2 LET 
124- LET 

3 — ” 

126 LET 

123 LET 
CONC=“ 
130 LET 
132 LET 

RM M2- 1 * 
134 LET 
136 LET 
L OU CER = 
136 LET 
14-0 LET 
NC M3 — T 
142 LET 
144. LET 
RAM M2=" 
146 LET 
146 LET 
E> = " 

1S0 LET 
152 LET 
ML = " 

154 LET 
1S6 LET 
F>VC ML = " 



R (11 =$460 

B$(2)a"2-DErt DE RLUEN M 



ft 13 1 =5460 

6$(4) s ” 4 -DEM DE REU ARG 



R (4) =110 

B4 (5) a"5-DEM DE REU R2XJ 



fi (5) s:19S 

B$I5r=“6-DEM DE ft ISO CO 



ft (6) =3010 

B£ €7) = *7-DEN DE PISO C£ 



fit?) =165 

B$(8) -"6-GEM DE PI5Q MR 



R (8) =110 

Bf (9)«‘ , 9-OEM DE TU50 FF 



r ( 9) =ss 

t IQ) ="10-DEM DE TUBO 



153 LET ft l 10* =102 

164 LET Bi&tll) =‘ 11-AETIR DE ALU 
EH Mo- ” 

16 B LET fitll) =21.65 

163 LET 8$<12) ='T2-R£TIR DE MOD 
P/ TELM M2=“ 

17© LET Ft t 125 =608 _ „ 

172 LET B$(13) =“ 13-RET1TR DE ESQ 

MOD M2* M 

174 LET ft (131 =715 

176 LET B$Q4) ="K-Rmfi DE E’SO- 
METAL M2~ “ 

178 LET Rt 14) =502 

16© LET B5(15)=-‘15-RETIR DE I NT 
ER E TOM=” 

182 LET =43 

184 LET E5 ( 15) 1L -RET IR DE COM 
DU IT HL=" 

136 LET fttI6)=16 

1S6 LET B® 117) ="17-RET IR DE APA 
R ILUMINc" 

190 LET R ( 17 ) =33S 

192 LET B* < 18) =“ 1Q-RETIR DE RPR 
R SRNXTr" 

194 LET IB) -?8& 

196 LET B»tl9) ^TQ-RETIR DE CX 
DAGUH=" 

19Q LET Rtl9J=1300 

£06 LET B* {£0>= T, aO“TflPUME TB PI 

N=" 

208 LET R (20) =200© 

£10 LET (21) sr"21»BHRRRCflO TO 
PIN=" 

212 LET fl £21) =16132 

214 LET B$taS)="22-lNST PROU AG 
UR= RT" 

PIG.LET At22)el6l59 

HIS. LET B* (33) — ” 23 - INST PROU LU 
2 PT=” 

£E0, LET RIS3) =2647 

22E LET B$T24> =”24 -INST PROU FO 
P?CR PT = " 

224 LET ft (24) =S132 

226.. LET Bt(25)s"SS-IN5T PROU SR 
NIT ^*T = ” 

225 LET ft (25) =18474 

236 LET B$ (26) = “26 -LIMP TERREW 

~ 232. LET R (S6) =42 
234 LET B( (27) ="27— CORTE OU ATE 
RRO H3=“ 

236 LET R 127) =622 

238 LET 6|i (26J t"2B-SOWI>AGENS (M 
IH 40) ML=" 

240 LET Ata©) =4550 

242 LET B$tS9)="£9-LOC FUND M2= 
244 LET ft (29) =90 

24-6 LET BIM30) ="30-ESCflU MAN M3 

24.8 LET ft (30) =76© _ . 

2S0 LET 85U31)="31-ESCGAAM W2=” 
252 LET R<31)=2112 

254 LET B* (32) = “ 32-RPTLOfW H2=" 
256 LET ft £321 =137 

258 LET E$ (33) ="33“CINTfi £ ft RE 
SP ALU M3=" 



308 LET R (44) =247© 

310 LET B$t45) ="45-ENSAlO COMP= 
312 LET ft <453 =20800 

314 LET B$(46) =“46-ALU IT TIJ B 
316 LET ft (46) =3171 

310 LET B$(47) ="47-AL.U XS&T TIJ 
BAR = " 

320 LET R (47) =1586 

322 LET B$ (46) ="48-RLU IT TIO L 
AM = ' 

324 LET ft ( 46) =5402 

326 LET 65* (49) ="49-ALU 1/ST TIO 
LRM = ” 

323 LET Rt49) =2701 

330 LET B% (50) ="50-RLV IT TIO B 

AI = " 

332 LET R (50) =2291 

334 LET ert51) ="51-ALU 1/2T TU 
BAI = " 

336 LET ft (SI) =1146 

333 LET 6* (5S) -"SS-RUV 5L CONC 
20 = “ 

340 LET R (52) =2325 _ 

342 LET B$(53i =“S3-PLU BL CONC 

344 LET R (53) =1516 

346 LET 5$(54) ="54-ALV PEDAfi^ 

348 LET ft (54) =9076 

□50 LET 6¥(5S) ="5S-ALU CORT Cft 
300KG Mo = “ __ _ m 

352 LET ft (SS) =51431 

354 LET B$ (56) ='Sb-IMP£RM FUND 
Mg-" 
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FRZR 4X 



PGR 



356 LET R(S6) =132d 

358 LET B$ [57) ="57 -IMP PfiR XNT 
EXT-' 

960 LET R(57J =14?1 

362 LET B$ ( SB ) ^"58-IMP C>' L*^G P 
ISC- M2r" 

364. LET fi{58) =3505 

366 LET 6$(59) ="S9-IMP LfWES = ’* 
370 LET ft (59) =3025 

372 LET 6*<60) =’‘6©-IMP LRU C T 
ERMECs" 

374. LET ft 160) =3802 

376 LET Bf (6U =”61-IMP UUNT GS 
CH CQBRE = “ 

378 LET fl[61)=3529 

360 LET B«(62) =“62-REU CHRP Cl 
RR 1 3*i” 

302 LET ftl6£)=23S 

304- LET B$ (63) - 63-REU XfiT GROS 
386 LET R (63) =450 

3Q8 LET B$(64) = ,, 64-REU XNT FIN = 

330 LET R{64)=369 
_392 LET B$'.6S) =’65-REU EXT GROS 

394 LET R (65) =653 

336 LET B|(G6) ="66-REU EXT FIN= 

337 LET R(66) =474 

396 LET B|(67) =“67-FR5T 

4- = " 

400 LET R (67) a5059 
4-02 LET Bt(68) ="68-fiEU PftST 
C 4X4 = " 

404 LET ft(68)=5193 

4.06 LET B$(69) s”65-LITOCERf)MICfi 
4-0© LET ft (69) =3922 

410 LET B$ 170) = ’70-REU PED MIME 
412 LET R(70)=3436 

4-14- LET B$(71> a"7l-REV P5v 5RRN 
lTO = ” 

416 LET R(7i)=4476 

410 LET BM72) = '72-REy HARM 5R 
ESP STO=" 

4-20 LET R <721=4-625 

4-22 LET B* (73) =“73-REU HARM TRfl 
UERT =“ 

4-24- LET PI (73) -7486 

4.26 LET Qf (74) ="74-RE«3 MRRM PRP 
HNfi = " 

428 LET R (74) =8526 

430 LET B*(75)="75-REy MRRH TIJ 
PRE o " 

4-32 LET R(75)=12615 

4.34- LET B$(75) =”76-RSUL ER 3.5X1 
S »" 

4-36 LET R (76) =3067 

438 LET B$(77)="77-RZUL 15X15 G 

ORs" 

4-4-0 LET R (77) =3197 

4-4.2 LET B$ (78) =‘’76-RZUL 15X15 D 

ec = " 

4-4-4- LET R 178) =34-57 

4-4-6 LET B$(79) =“79-RZUL CANT «L 

UM 

4-4-8 LET R (79) =854 

4-50 LET D$(60) =“80-LfiMBRl5 CEOR 

°m tif imbu 

X tm ill? gilMf ^Il-LRMERIS JRCR 

RflHDft=" 

4-50 LET R 132) =2666 

4.62 LET BS 183) = "63-REV CH DURR = 



4-64- LET R 183) =3613 

466 LET 184-1 ="84- -FOR TB 



IN M 



flC-FEH= M 

466 LET R(S4J =2640 

47® LET (85) = l, 85-*FOR CH DURR 
60X60=” 

472 LET R IQS) =2091 

474 LET Bj(56)=”56-FOR CH DURR 
TERHftCUST = “ 

476 LET R (86) =3729 

478 LET BS 167) =”67 -FOR PL GESSO 

_ 480 LET ft (87) =1960 
482 LET Bf ( 88) ^’'BS-FOR RLUMINIO 

434 LET H(8B) =6630 

456 LET BS (69) =“69 -FOR PVC RIGI 
DO = ” 

438 LET R (69) =286© 
l ^90 LET B* (9B? ^“90-FCifi L RUE PRE 

492 LET R 190) =4167 

494 LET 6*01) = ' 91-LfrJE PR5t = u 
496 LET R(91) =6328 

493 LET B$(92) =”92-LftSTRO C 5 6 
CM-“ 

500 LET R (92) =1178 

510 LET B$ (93) =”93-CERflN ESN 7, 
SX15=” 

512 LET R 193) =2960 

514 LET B$ (94) =”94-LflJQTft 30X3© 
S 16 LET ft (94) =£147 

51© LET B*(95) =“95-CRCG CERPM= ” 
520 LET R (95) =2213 

522 LET B$(96)=“96-PI50 CER 15X 
15 = " 

524 LET ft (96 ) =2654 

S26 LET B$(97) =‘97-PX50 CER 2©X 
20=" 

523 LET R (97) =3364 

530 LET 6f (96)=‘‘96-PlSO CER 20X 
30 = " 

532 LET R(98) =4589 

( 534 LET Bf (99) =”99-Pl50 GRRNIL= 
536 LET A (99) =2123 

S38 LET 6$(100) =’T00-GRRNIL ESC 
HL = " 

540 LET ft (100) =2636 

54-2 LET 6$ ( 101) =‘T©1-PI50 PD HI 
WEIRfi= ” 

S44 LET R(101) =2278 

546 LET BSI102) =‘TB2-P1S(3 GRANT 
TO = " 

548 LET R( 102) =1937 

SS0 LET B$(103) =” 103-PlSO PD IT 
ftCOLOMIa” 

552 LET R( 103) =4599 
554 LET 6* ( 104) =” 104 ~P ISO MRR M 
BR E STO = “ 

556 LET ft< 1©4) =5971 



556 LET 6$ (105) 
TRflUERTc" 

56© LET R(10Si= 
562 LET S « 1 186 l 

564 LET R ( 106) = 
566 LET B$(107) 
TIJ PRETO = % * 

S68 LET R i 107) s= 
570 LET B*(108) 
MM = " 

572 LET R ( 108) = 

574 LET B*(109) 
7X21 = *’ 

575 LET R(109) = 
S7S LET B* ( 1 10} 

ER = " 

580 LET A (110)= 

581 LET BJ(IU) 
CONUENC H2=r” 

582 LET R (111) = 

583 LET B*(ll2) 

rre=** 

584 LET R (112) = 
586 LET B*(113) 



:”105-FI5O HARM 
9741 

= “ 106 — R 15Q HARM 
11301 

=- 1Q7 -PI56 MRRM 
16111 

= *' 106-PftVIFLEX 2 
3168 

=” 109 -P ISO TRCO 
2402 

= , “iie-prso t«b p 

4432 

X 1 1 -FORftIPISO 

3465 

=“ 112-POD GRRNIL 
1237 

= ” 113— ROD PD HIM 



o=- 

592 LET 
594 LET 
6 = '* 

596 LET 
59© LET 
CORDo" 
608 LET 
©02 LET 
EX = " 

604 LET 
606 LET 

608 LET 
610 LET 



re l fis ci 



R (113) =730 

BS (1143 =**U4-RQD GRRNTT 
R (114) =717 

Bft ( 115) = 1 IS-RQD HflRMOR 
R (115) =2256 

B*( 116) =” LUG-ROD PER C/ 
ft(U5t«57s 

B$ (117) - “ 1 17 -ROD PHUTFL 
R ( 117) =494 

( 1 18) =" 11B -PETT CERRH 
R ( US) =948 

B$(119)=”1I9-PEIT HRRM= 

S12 LET R (119) =1442 
RftH-‘ ,LET B* ( 120) =“12B-SOL£lRR CE 
61© LET R (120) =1046 

51© ( 1^1) =" 121-SOLEIRR HR 

RM = 

ea© LET fl(lSl) =1663 

Hfl 2 |«^=^ 5<122J= " laa - HRO P -' TEL 
824 LET fi t iaS) =3032 

SZe^LET e* < 123) = " 1S3-MRD P TEL 
sao let Raa3i=24is 

©3© LET SS ( 124) = " lai-CQE TEL PR 
RNC =*’ 

©32 LET ft(12*l) =1©B2 
^634 LET BS(iaS) ="la5-COB TEL PR 

638 LET filiaSi =aiS2 
535 LET B$U2B)i"lS6-COB TEL PL 
RN = " 

640 LET R(126) =1437 
642 LET B*(127) =”127 
M QHH = ■' 

©44 LET ft < 127) = 159Q 

©46 LET B* ( 126) =” 128 -TEL CANALE 
TE 93= J 

S4G L ET R ( 128) =1999 

S5S LET B £ C 129) = " 129-TcL CftNftLE 
TE 433“ 

652 LET R( 129) =2982 

654 LET B$ ( 130) =*• 130-TEL ALUM 1 
MM = " 

656 LET ft(130) =3245 
65B LET B* (131) = , T3l-TEL P‘JC = " 
660 LET A (131» =2297 
c-6S LET S$(132) =“132-TEL DOMOS 
FIBER = V 

664 LET A (132) =26660 
RCRIL-" T BS tl33) = '(8-33-TEL DOMOS 

665 LET R(133) =46160 

67® LET BS < 134 ) r“ 134 -PORT 2 NT C 
RT FER = " 

S72 LET fi(I34.)=12O07 
674- LET O 5 ( 135) =“ 135 -PORT EXT B 
RT FER = " 

676 LET FI (13S) =14366 



N 

030 LET fl (J36( =14624 
^66E^LET Bi(13?l ="137-PERS ENR £ 

634 LET R I 137) =12202 

714 PRINT BJIC); INT IKtfHCJ J 

718 NEXT C 

720 PflUSB 200 

721 POKE 3.6437. aSS 

722 CL5 

730 SLOU 

731 LET TOTAL DR OBRR=S 

73H PRINT "OUflNTOS XTENS UOCE 
HI USRB?" 

733 INPUT I 

734 CLS 

730 FOR M = 1 TO I 

740 PRINT " DUE XTENS UOCE URI u 
5RR?” 

750 INPUT C 

XORDErT”" 1 '® URhrrRS L1EZES (BURNT 
770 INPUT S3 

780 PRINT Bt 1C) ; IWT (KfR(C)) 

790 PRINT ‘TOTRL= ":Oi "X"; INT t 
K*RCC)>,;“ = ” ; TRB 24.; INT (OW-tfilC 



V 



} J 



TOTAL DR 



792 LET TOTRL OH QBftR: 

OBRR + INT OiKsR(C) J 

734 NEXT M 

735 PRUSE 60© 

797 POKE 16437,253 

799 CLS 

800 PRINT RT a, a. "TOTAL DU OUST 
O.DR OBRH NESTE PROGRRNR= "I"CR* 

.TOTRL DR OBRH * 

810 PAUSE 500 
B20 POKE 154-37 , 255 
830 CLS 

/Nf?" PRIMT frr "SHTXSFEXTO IS 

859 INPUT S* 

053 CLS 

gg® ST SS=~N" THEN GOTTT SO 
870 IF S*="3" THEN PRINT BT la-, 
a; "OBRIGRDO - BTE LOGO- 
360 PROSE 180 
B90 POKE 16437 . 255 
900 CLS 
9-1.0 STOP 



PreQos Unitarios — 2 a . parte 



10 HEM "PRECOS UNITflRIOS" 

IS REM "SR. PRRTE" 

15 CLEAR 

as slou 

as PRINT BT 9.£; "PRECOS UN IT Bp 
IOS " 

30 PRINT RT 11,2; "PROEfBSm. BES 
ENUOLUIDQ PELO RPQUITETO JOSE ED 
URROO MRLUF DE CBRUBLHO- 
40 PRUSE 180 
50 POKE 16437,265 

69 CLS 

ga PRINT BT il 2; "RNOTF OURNTO 
S E OUR IS SBO OS ITEMS DUE UOCE 
VRI USflp , PRRR EU SPHR-LOS" 

S3 PAUSE 240 
61 POKE 16437, 256 
66 CLS 

68 PRINT BT 9, Si "PRECOS BASE D 
O 3 MES DE UUNMO DE 1902 - ORTN=18 

70 LET Jal873.37 

72 PRINT BT 13 , S ; "DIGITE B ORT 

SE D g E S5S s ?!?^ flDO tou 

74 INPUT H 
76 CLS 

78 LET K=H.^J 
80 DIM B* (137,26) 

90 DIM n ( 137) 

9S FR&T 
100 LET C=® 

110 FOR C =1 TO 137 
^lao LET B*(l) ="1-CBIX FE BBSC M 

laa LET Btl)=73±6 

124 LET B* (2) ="2-CBIX FE CORRER 
M2 = 

126 LET ft (2) = 111134 . 

128 LET B* (3) ="3-CAXX FE MAXIMA 
R Ma = “ 

130 LET ft (3) =14254 
132 LET B* (4) = ”4~C-ftIX FE PORTR 
RBR I M2 = " 

134 LET ft (4) =17854 
136 LET B$ =^*S-CftrX FE GRfiPE 
PROT H2 = *’ 

138 LET fl<5)=318a 

140 LET B$(6>=*‘6-CAIX FE PORTA 
ENR M2=" 

142 LET ft (6) =10338 

=" 7— OftTX FE FOftTft 

PANT M2=" 

146 LET ft (7) =1659« 

148 LET B*(3) =”3-CfirX SLUM CORR 
ER M2 = “* 

150 LET ft (©) =13632 

1S2 LET &*(0) =*’S-Cft JX ALIW BASC 

M2=" 

154 LET ft(9>=2H2Sr 

156 LET B$(lft) ="18-CBIX ALUM Mft 
XIHftR M2=“ 

158 LET ft < 10) =21632 
MM 6 Ma=^" TFJftNSP 3 

162 LET ft(ia>=4537 
M 16.4^LET B$(i2) =’*12-UlO TRAMSP S 

166^LET ft ( 12) =6631 

16Q LET B*(13) ="t3-VID FfiNT 4 MM 
H2 = ” 

170 LET ft (13) =3731 

Si (14) ="14— uro aramado 

orln H 2 = 

174 LET ft (14) =10933 
M 1 ^|_ir ET ( 15) =**l^-UITr C4AT4EL 4« 

178 — LET ft (15) =11440 

18ft LET ="16-UID PftOSOL 4 

MM H2=” 

132 LET ft (16) =11440 
184 LET B*fl7) =“17-UXD PROSOL 6 
MM M2ts" 

186 LET A (17) =12240 
18© LEX B1(18>= ,, 1S-UID QOLORCLft 
55 5MM = “ 

190 LET ft (19) =12065 
192 LET BS(igj ="19^TUBU f*tJGT HSU 
ft 1/2=" 

194 LET ft(19)=4B4 

196 LET &* (20) =“2e-Tusa PUB: AOU 
ft 3/’4=» ,r 

198 LET ft (20) =621. 

&TO LET 8$ (21) =^2^-Tl»0; PU^f-ftSU 
ft 1=** 

202 LET ft(21)=7Q7 

204 LET B$(22) = M 22-TU90 PUC ftGU 
ft 1 l/4=" 

206 LET ft (22) =955 

208 LET 0* (23) ="23-TUBO PUC ftGLi 
ft 1 l/'2 = * r 

210 LET ft (23) =1203 

212 LET B4(£4.) ="23-TU9C RUG RGU 
fi 2 ='* 

214 LET ft (24) =1435 

| IS LET B$ (2S) =”2S-TU0O PUC E3G 
218 LET A!25) =1012 

220 LET B$(£6) ="£6-TUSO PUC ESG 
3 = " 

222 LET ft\26)=12Sl 

224 LET BS (27) =' 27-TUOO FVC ESG 
226 LET ft (27) =1446 

228 LET B$(23) =“SS-TUBO PUC E5G 

23® LET ft (23) =2122 
^232 LET 8i (29) ="29— TUBO COBRE 1 

234 LET ft (29> =1187 

236 LET BS(3fli ="30-TUB0 COBRE 3 
/4- = " 

938 LET A (30) =1131 

240 LET BS (31) =■ 31-TUBO COBRE 1 

242 LET R (31) =1740 

I - EX BJ (32) ="32-TUeo FF ESG 

246 LET B (32) =3309 
^243 LET BS I 33.) s-OO-TUBO FF sje 

250 LET B (33.) =4163 
g 2S2 LET BS (04) ='*34 — TUBO FF ESS 

354 LET R (34) =6443 



258 LET R (35) =1229 



MICRO SISTEMAS, jul ho/83 



79 




COMPOSIQAO DE PRE^OS UNITARIOS - II 



£60 LET Bt (36' ="36-Tl-«0 CIHfiKIfl 
NTO 4. = " 

2§a LET R (36) = 1513 

£64 LET Bt(-37) ="3?-BflCIfl SIF CO 
n C/ MET = ' 

£66 LET 0(37) =10943 
?63 LET 8Si33) -"3S-3IBE ■L-SR C X 
DUCHfi=- 

270 LET fli33) =21337 
ST2 LET S* (39) ="39-B9N EMB COR 
CX MET 5P=" 

2T4- LET H!39! =91767 
276 LET Bt (4-03 =-*8-LRU Sx COL C 
✓MIS 62X50*" 

273 LET O £4.0} =15134 

S80 LET Bt<41! = ,, +l-Lfl£ ! C- COL L. 
✓MIS 62X50=' 

£63 J-ET 9 iii) =26314- 
264' LET BJ (4.2- 1 =“42-HICT COR C-X 
MET 44X77=- 
236 LET fli4£)=3263 

233 LET Bt (433 ="43-PIfl IWOX 47X 
30 C ✓ Mrsr = -’ 

200 LET 9 ( 43 ) =25462 

202 LET B$ (44) =”44-PX9 IMOX 56X 
33 Cx MIST=" 

294 LET fl 144) =25922 

206 LET B»i45) ="4S-CHW BR9CO F 
TXO = ” 

298 LET 9 (45) =4-253 

300 LET B* (46) ="46-CHW ‘MflC-O ft 

rrrie = " 

302 LET 9(46.1=9243 

304 LET Bt (4-7) b"47-CHUU ELETRIC 
0 = ” 

306 LET 9(471=3763 

308 LET Bit (4S1 5--+6-CX PBSC 200 = 
310 LET 9(43) =4693 

312 LET BS (49) =“49-CX 9GU9 CIH 
Hh 508L=" 

314 LET fl (491 =18796 
316 LET Bit (50) s”S0— CX 96U9 CIM 
RM 750L=" 

313 LET R (50) =21626 

320 LET B*(51) ="51-CX SSUfl CIM 
RM 1M3 = " 

322 LET « <511=24956 

324 LET Bt (52) ="S2-TO CONC 60X6 
0 Cx MET = " 

326 LET 0(52) =9043 

320 LET 04 (53) ="53— TO LOUC9 63X 
55 Cx COL = :t 
330 LET R(53)=17628 
332 LET 0* (54) ="S4-T8 GRBHIL 85 
X50=” 

334 LET R (54) =13463 „ 

336 LET B* (551 ="SS-TO 1KOX 63X7 
3 = " 

336 LET R( 55) =28418 _ 

340 LET B4(S6) ="58-FILTRO PORED 

E 342 LET ft(S6) =11557 
344 LET Bt(S7) =-S7-ftSUEC OGUR E 
LET 150L = • 

346 LET 0(57.1=59930 

348 LET at *58) ="S8-09UEC (WBH 9 
OS 10L=" 

350 LET O (58) =36530 

352 LET B4 (59) =' , 59-BE>UH5. CrtROOL 
CENT =" 

354 LET R (59) =23730 
356 LET B* (60) ="60-f)0t)EC EN SOL 
OR 10P=" 

358 LET 0(601=593000 _ 

'360 let 0* (61) ="6i-BEBED ELET 4 
0L = " 

362 LET fl (61) =56654 

364 LET B* (621 ='*62-HOTOBOMS9 CE 
NT 3/4=" 

366 LET 0(621=57928 _ 

369 LET B4 (63) ="63-MOTOBOMB9 CE 

NT 2 = ” 

370 LET 9 (63) =60276 

372 LET B4 (64) ="64— MONO INC 1 1 
X2 HL=" 

374 LET 9 (64) =731 _ . _ 

376 LET B4 (65) =''SS-ES® INC. 1 lx 

Os- 

378 LET 9(651=1901 _ 

3S0 LET Bt (66) ="66-BBRIGO 60X90 
XCQ=" _ 

382 LET 9(66.1=9711 

384 LET Bt(67) ="67-EXT C-(32 6XG = 
3S6 LET 9 (67) =13623 



CORSARIO 



1 * Venda . i > / - ;A*y M 

I &’V53*tfV> Instalafdo ; V.Vi’.K'--* 1 

P >vAdapw&cp-; II 

^ * MamitencSo ' * || 

'?■ TiL <02 U 248-8290 j ''I 

l^ Caixu Postal 33 J2r- Rio J 



338 LET B 4 (631 ="63 -EXT PO 9UIM 
6KG ' ‘ 

390 LET 9(63) =7253 

392 LET Bt ( 69 ) =" 69 —EXT EoPUMH 1 
0L = *' 

394 LET 0(691=5323 

398 LET B4 (70) ="70-EHT CEP POST 
E 25KW = '' 

398 LET 9(701=46995 

400 LET Bt (71) =*‘71— CX ENT «z& E 
XT' 25KW-" 

402 LET R (71) =23077 

404 LET B* (72) =-' 72-CX P9S SSX25 
X10= - 

403 LET BS (73) ="73-0090 RUT 14 

D ili £gT G |^?3) =34021 
412 LET 8* (74) i -74-OUfl RUT 26 0 
ISJ CH SER=" _ 

414 LET 9(74) =65203 

416 LET BS (75) ="75-CN B9SE MARK 
3X30A — ** 

42 I lIT BsT76?="75-CH BR5E H9RM 
3X1009 = " 

til LET gi^^r="?7-CH BB5E PORC 
EL 3X300=“ 

til tlr B*T7Srt"73-CM BBSS PORC 

E 430 X LET _ fl (70) =1003 
432 LET BS (79) ="79-C-X TEL 2*X26 
X 15- ” 

434 L_£T R(?9» =35M _ 

436 LET B$ = M S»-©UB& TEL 2X3 

X0 . 20=“ 

440 hir Bi1iir="8i-PT0 seco con 

D 3/4*—" 

444 LET B*?S2> t"§2-OU9D COMP EM 

B ttl tf? gillir^ti-BOTTTO PX COM 

P 450 LET 0(33.1=5758 

4S2 LET BS 04) ="B4-P9ROROIO FR9 

N Ss* N L£T 9 (34) =22537 

486 LET B$OS) s 'SS-PTO LUZ CENT 

”453 LET 0(35) =4534 _ 

460 LET Si ( 86 ) =“36— INTER PIOL 1 

^lea^LET 0(361=2563 
464 LET Bit (37) =“37 — INTER PXOL 2 
AL 4X4=“ 

466 LET 0(37) =3790 

463 LET B* (-33) =-"33- INTER- PIHI 6 
RL 4X4 = " 

470 LET 9 (30) =5535 

472 LET B$(39) ="83-TOH EMB II0V 

_ 474 LET 0(39) =2413 
476 LET 04 09) ="90-TOM EHB 2201* 

478 LET 0(901=8233 

430 LET S* (91) = "91-TOM PISO OLU 
M TRHPfie" 

482 LET 9 (91) =4604 

484 LET BS (92) ="92-PLOFDNIER GL 

obo LErr=" 

486 LET 9 (92) =5133 , _ 

408 LET BS 03) ="93-OPOR LUZ FLU 
OR 2X200=" 

490 LET 9 (93) =5229 _ 

492 LET BS 04) ="94-9POR LUZ FLU 
OR 4X40U=" 

494 LET 9 (94) =6162 _ 

49ft LET B$ (95) ="95-C9SO PL9ST N 
6 = " 

498 LET 9 (95) =300 

500 LET Bt (96) ="SS-C9BO PLftoT N 

*502 LET 0(961=534 ^ __ 

504 LET Bt 07) =“97 -COSO PLftsT N 

S 5S8 LET 9 (27) =814 _ 

606 LET Bt (93) ="95-0)30 PL95T 1 
✓0 = " 

519 LET O(9S>=1260 

512 LET BS 09) ="99-FIO PIR95TTC 
14=” 

514 LET 9(93) =64.19 

516 LET Bt (100) =”100-EIO PIRflST 
IC 12=" 

518 LET 9(100> =86 _ 

S 2 B LET Bitiai) =“i01-FIO PIRflST 
IC 10 = " 

522 LET 0(101) =117,07 „ 

524 LET B* (102) =''1S2-FI9 P35B4T 
TC S = " 

526 LET O (102) =136.62 

523 LET Bt (103) ="103 -FIO P IRflST 
IC 6 = " 

530 LET 9(1031=273.72 „ 

532 LET BS ( 104) =" 104-C.9ND PUC R 

IG 1x2=" , 

534 LET 0(104) =359 

536 LET BS-f 105) ="ieB-CDHO PUC R 
IC'3x4=" 

538 LET 9(105) =434 

S40 LET Bt (106) =”10S-CON0 PUC R 
IG 1 = - 

542 LET 9(106) =S58 

544 LET 3$(1B7) ="107-CONB PUC R 
IG 1 1 x4 =" 

54 ft LET 9 (107) =735 

543 LET Bt ( 103) ="J03-C0MS> PUC R 
IG 1 1x2=" 

550 LET 9 (103) =063 _ 

SS2 LET Bt (109) ="109~C-OMD PUC 9 

LET 9 ( 109) =2036 

556 LET at (110) =''il0-C0Ht> (=5 lx 
2 = " 

353 LET 9(110=522 __ _ 

560 LET BS(lll) ="ill-COMO FG 3x 

*562 LET 9(111) =642 
564 LET Btdia* = -112-COND F6 1 = 

566 LET 9(112) =304 

563 LET B*( 113) ="il3-C-GNf) FG I 
l/4=" 



570 LET 9(1131=907 

572 LET B) (114) ="114-CONt> Fb 1 
1/2=:" 

574 LET R<114.) =11S6 _ . 

576 LET BS (115) ="llS-COND FG 2= 

578 LET 9(115) =1432 

580 LETT Bt (116) =TXlt>— LON£> FG 2 
1 /2 = “ 

532 LET 9(1161=2233 

584 LET Bt ( 117) =" 117-COMD FG 3= 

5S8 LET 8*( lisrl^llS-DISUUNTORE 

S ||i LI? Bttll0r="fl2-PTO LU2 CO 
HPLETO = *- „ 

594 LET 9(1191=12935 

596 LET B* ( 120) =" 120-PINT UflTEX 

598 P LET 9(120) =566 __ _ 

600 LET St < 121) =" 121-PINT LOT C 
X M9S COR = ” u 

III hi? git?Mr? ? l22-PINT OLEO 

S IS = hl? gt?Sl3.rPf23-PINT OLEO 

C 610 fl LET°9 (123) =1149 _ 

612 LET Bt (124) ="124-PXNT E=M s 
X MOD = " 

|iS c tl? 25-PINT E5M C 

^iii c hi? g?tmr^fis-PiNT oleo 

3 ✓ MOD = " 

111 hi? gi?fl?rt"?27-PINT OLEO 

C ill hi? gi^rSetae-PIHT UERN 
S/ M9D=" „ , 

i|| tp §i a (fl^r^t29-PIMT UEO C 

636 LET B* 1 ! 130 130 -PINT EsM 5 
✓ E50 FE=“ 

630 LET 9(1301=1013 
S40 LET Bt (131) =" 131 -PINT OLEG 
Sx ESO FE =" 

Iil s hi? e ia?i^^?32-PINT 6R9F 
^Itrhiflt t ?&r "5 33-995P COL OF 
652 LET Bit 134.1*^^134— L IMP PI50S 



PINT E5M 5 



-PINT OLEO 
-PINT 6R9F 



-998P COL OF 



-LIMP PI505 



656 LET Bt (135) =" 135— LIMP UIDRO 

III LET g??l! 6.f="136-LIMP REM C 

gDpK=" 

IIS bir BS^X3rr="S37-LIHF SP*R 

5 666 T LET 0(137) =205 
714 PRINT BifC) ;S1C.I 
710 NEXT C 
723 P9U5E 390 

721 POKE 16437,255 

722 CLS 

731 LET U TOT9L DO GBRO=0_ 

732 PRINT "GU9NT03 ITEMS uact V 
91 OSOR7" 

733 INPUT I 

734 CL 5 _ 

73Q FOR H=I TO X 

740 PRINT “GU9L ITEM VOCE UOI U 
SRR7 - - , 

760 PR IN? “OURNT9S UEZCS7 (»U9f*T 
IDRDE) " 

770 INPUT O 

780 PRINT Bt(C> , XNT (K»9(C)> _ 
790 PRINT "TOT9L = ; e; "X " ; IHT 

(Kifl(C));" = ",T9S 26; XNT (Oiihifi 

(PJ J 

792 LET TOT9L 09 OBR9=TOT9L DO 
GBRO-* INT (O-a-X »9 (C) ) 

794 NEXT M 

795 PAUSE 6»0 

797 POKE 16437 ,255 

aae prInt 9T eo,2;*‘tot9l dos m« 

TERI9IS 09 OBBR NESTE PflOGBflHft i 
TOTAL D9 QBR9 
810 PAUSE 600 
820 POKE 16437,255 

840 PRINT «T 9,2; "SOTrSFEITOT i 
3/Nl ” 

8SO INPUT 

all IF S S*= -N" THEN GOTO aa 
870 IF S*="S" TH EN POINT BT 19, 
2) “OBRXG9DO - PTE LOGO ' 

8ft0 PBUSE 1S0 
890 POKE 16437,255 
909 CLS 

210 -STOP _ 



Arquiteto formsdo em 1976, Jasd Eduardo 
Maluf de Carvalho trabalha coma autOnomo 
em seu escritdrio, reaiizando projetos residen- 
ciais e comercials. Atua tambrfm am planeja- 
men to urbano na SEMPLA — Secratarla Mu- 
nicipal de Plenejamento de Soo Paulo. 
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RELAX FORI 
COMPUTERS 
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III "SenPREBOAS impressOes 

Pitas Impressoras de fabrics fio pripda para micros & gra redes computadore s, deserwolvidas strands de Know-how prtlpdo, of ere- 
cendo a opfAopor Nylon naclonalou Nylon importado. 

Diskettes 8', Mini-Diskettes 5 HA’, fitas K-7 Digital. Data Cartridges, Discos Magntticas. Pitas Magnttkas, Leader Macho, leader 
Pemea, Pita Adesiva para ConexSo de Leader. Espethos Refletioos, Pitas de Arrastro. Tape-Seat, Pitas de PotktHeno para Magnet! - 
lafio e Ms-Marca(Ao (CMC-?). Pita de Nylon OCR, Mdueis para CPD, Pastas Arguiuospara Diskettes e POrmuldrios Continuos. 
RecuperafiodeDiscos Magniticos, Reentmtagemderitaslmpnssoras. 



GRUPO MACHADO 

MR Cum. do Prod Xerouralkos 1 Ida 
Data Ribbon Ind de L uci-> Impressoras I Ida 
Data Nova Assess, leeniea S/C J.tda 



Adm. Vend. is Kuo 1 urd C'orkrane. 775 - Ipiramja S,m I’nulo 

C c*|>. 04213- Teles (01 I) >1224 

Tels : 273 2594. 274 7568- 2 1 5 4562/274 6240 

Filial: Rtia Senador D.inlas, 75 - 221’ And.ir Sal.i 2202 

Kin de Janeiro R| fet, 220 4181 





O tamanho e os preQos diminuem, enquanto aumentam a capacidade 
e o desempenho. Sao os novos perifericos para micros, mostrados na NCC'83 



NCC’83: avezdos 
perifericos 



s microcomputadores, que ano 
passado conseguiram firmar-se 
na National Computer Confe- 
rence NCC dos F.stados Unidos como 
maqumas “stJrias”, recehendo uma 
atenydo antes monopohzada pelos sistc - 
mas maiores, consohdaram a sua posi^So 
na NCC’83, realizada dc 16 a 19 do 
maio no condado de Anaheim, Los An- 
geles. 

Isso porque.se em 1982 foi a vez dos 
computadores, notou-se este ano uni 
accntuado aperfeifoamento dos perifd- 
ricos para mdqumas de pequeno porte. 
As impressoras, por exemplo, tornaram- 
se mais leves, compactas, vclozes (a 
maiona utihzando a impressed bidire- 
cional) e com pre<;os relativamente mais 
baixos, C) mime rode fabncantes tambdm 
aumentou, mas os estandes da Epson 
America, Okidata e C-ltoli foram os que 
atrairam o maior mimero de visitantes. 
As tdcmcas de impressao a cores, apre- 
sentadas em pelo menos dois estandes, 
deverao atingir nuuto breve grande po- 
pulandade, em virtude dos recursos que 
oferecem. 



DISCOS E TP 

() armazenamento de dados foi outro 
setor em que a industna alcam;ou gran- 
dcs avangos. Os discos rigidos com tec- 
nologia Winchester ficaram leves, com- 
pactos, com maior capacidade e menor 
pre 50 . A Apple apresentou o proFile, 




drive com capacidade de 5 Mbytes desti- 
nado a uso com o computador Apple 
111, enquanto que a Radio Shack ofere- 
cia aos usuarios do TRS-80 Mod. 12, 
por US$ 3 rrul 945, urn disco rigido de 
12 Mbytes expansi'vel at<5 48 Mbytes. E 
uma companhia japonesa, por sua vez, 
mostrou uma unidade de 50 Mbytes, do 
tamanho de uni floppy de 5 1/4 polega- 
das, por apenas USS 5 mil. 





No sistema VisiOn, o video Simula uma mesa comum de trabalho. Os relatdrios podem 
ficar superpostos como folhas de papel. O controle de cursor, de SCROLL e a execufdo 
dos comandos sdo feitos pelo mouse , em suhstituifdo ao ieclado. 
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TRS-80 Mod. WO: ati 32 K RAM, video com matrix de 240 x 64 pontos, modem 
embutido, interfaces paralela, serial e para cassete, altrn de haterias recarregdveis qtte 
mantem a mem Aria quando desligado. 



Na 3rea de disquetes.ocorreu uma re- 
du$flo de metade no volume das umda- 
des, ao mesmo tempo em que os drives 
de 5 1/4 polegadas aumentaram a sua 
capacidade de armazenamento. Varios 
fabricantes estffo lan9ando floppies de 
3 1/2 polegadas, que permitirao o uso 
de disquetes nos micros pessoais. 

Em transmisiffo de dados, muitos fa- 
bricantes apregoavam as possibilidades 
de liga^o de seus equipamcntos as re- 
des tipo Ethernet ou Source. Outras em- 
presas, conio a Apple Computer, de- 
monstravam a ligat^o dos seus micros 
a mainframes (sistemas de grande porte) 
IBM e «i rede Dow Jones de cota95es de 
valores. A Radio Shack apresentoua re- 
de ARCNET, capaz de interhgar de trSs 
a 255 computadores TRS-80 Mod. 12 
ou Mod. II numa rede local de automa- 
93o de escntdno. 

Aldm disso, trcs novas teaiologias es- 
t3o sofrendo uma rdpida evolu93o e pro- 
metem em breve urn amplo espectro de 
a plica 930: a ultra-alta resolu93o de vi- 
deo, o reconhecimento de voz e a digi- 
taliza93o de imagcns com armazenamen- 
to em disco 6tico. 

Os videos de ultra-alta rcsolu93o, por 
comportarcm um numcro bastantc ele- 
vado dc pixels (pontos de imagem) na 
tela, possibilitam uma defini93o de ima- 
gem muito supenor 3 dos videos de alta 
rcsolu93o c incomparavelmente melhor 
que os videos comuns dc TV. 0 numcro 
de fabricantes desses equipamentos tern 
aumentado muito nos EUA, e o uso de 
videos profissionais nos micros pessoais 
ja i uma pr3tica bastante dissemuiada. 

Ccrca de 10 exibidores oferecerain 
demonstra9<5es na drea de reconheci- 
mento de voz e 0 vocabuldrio reconhc- 
cido pelas mdqumas tambdm cresceu. 
Devido 3 comodidade que oferecc na 
comunica9ffo homem-mdquina, esse se- 
tor deverd apresentar um crescmicnto 
acelerado a medida em que os equipa- 
mentos foretn se tomando mais podero- 
sos, reconhecendo um numcro maior de 



palavras e com maior precis3o. Entrc as 
aphca9fies de entrada vocal de dados su- 
gendas por um dos fabricantes desses 
aparelhos, a Interstate Electronics Cor- 
poration, encontram-se a automa93o de 
fdbncas, aplica9fles mddicas, automafffo 
dc cscnt6rios e desenho assistido por 
computador. 

A digitahza93o de imagens com arma- 
zenamento em disco titico foi a grande 
atra93o no estande da Panasonic. Nes- 
se sistema, quadros fixos focalizados por 
uma camara de TV (em preto e branco 
ou a cores) s3o digitahzados e em segui- 
da gravados por um feixe de laser em 
disco 6tico, num gravador espeafica- 
mente projetado para esse fim. A recu- 
pera93o dessa imagem e sua apresenta- 
930 no monitor de TV 6 fcita por inter- 
mddio de um teclado localizado na parte 
supenor do aparelho. Essa tdemea tern 
aplica9ffo em setores como o cmcmato- 
gnifico, educacional e de comunica93o, 
entrc outros. 

Entre os computadores, a grande es- 
trela foi o USA (Local Integrated Soft- 
ware Architecture), da Apple, sistema 
de 16 bits que pode operar lambdmem 
32 bits. Os micros de 16 bits, alias, esta- 
vam presentes em diversos cstandes, des- 
tacando-se o Personal Computer da IBM. 
Outras importantes novidades ficaram 
por conta da Texas Instruments, que 
lan9ou tambdm o scu micro profissional, 
provavelmente para conairrer com o 
1BM-PC, e da Xerox, que apresentou o 
8010 Professional Workstation. 

O CAMUNDONGO E A TARTARUGA 

Na area de software, mais especifica- 
mentc, dc programas-produto, quatro 
empresas se destacaram na NCC’83: Vi- 
siCorp, MicroPro, Microsoft e Hayden. 

A VisiCorp, que adquinu do seu au- 
tor o software mais vendido do mundo 
depois do jogo Space Invaders, o pacote 
financeiro VisiCalc, apresentou, aldm de 
uma nova vers3o dcste o Advanced 

» 

m 



Obtenha sua bolsa 
de estudos com 
107« a 507. 
de desconto 




• Linguagem Basic, Cobol, Fortran a 
Assembler 

• Contato direto com o computador 

• Aulas expositivas e pr tineas 

• Suporte para alunos 

• Fornecimento de material diddtico 

• Aulas a os Sdbados. 

TURMAS: MANHA / TARDE / NOITE 
INSCRIQdES PARA NOVAS TURMAS 
VAGAS LIMITADAS 
CERTIFICADO DE CONCLUSAO 

SCREEN 

Air. Eng. Luis Carlos Berrine, 991 
fone: 531-5008 




SEJA NOSSO 
COLABOR ADORI 

Fapa um bom programs sobre: 



* iogos 

* aplicaqdes dombsticas 

* soft utiUt&rio, etc. 



Envie-o para MICRO 
SISTEMAS, junto com seu 
nome completo, endereqo e 
telefone. Os programas 
aprovados serSo pagos e os 
outros, devolvidos. 



VENHA FAZER 
NOTlCIA CONOSCO! 



1 SCI E? m 3*5 

RIO - Rua Visconde Silva, 25, RJ, 
CEP 22281, tels. (021) 266-5703/ 
266-0339/246-3839/286- 1 797 . 

SP — Al. Gabriel Monteiro da Silva, 
1229, CEP 01441, tel. (011) 280- 
4144 - Jardim Paulistano - SP. 
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NCC'83: A VEZ DOS PERIFeRICOS 



VisiCalc — dois novos produtos, ambos 
para uso no micro pronssional 1 BM-PC. 

O Visi-On segue a filosofia de soft- 
ware extremamente poderoso e facil de 
usar, com forte orienta^So gntfica, po- 
pulanzada pelo Lisa, da Apple. Ele ope- 
ra com somente nove comandos bdsicos 
em Ingles, permanentcmcnte mostrados 
numa barra de menus ao pd do video. 
Ao se posicionar o cursor sobre o co- 
mando, ele muda imediatamcntc de vi- 
deo inverso para normal, mostrando que 
estd pronto para ser executado. 

O posicionamento do cursor, bem co- 
mo a implementaijffo dos comandos sffo 
feitos atravds do mouse (camundongo, 
em Portugues), cspdcie de controle re- 
moto ligado por um fio ao computador 
e que funciona da seguinte maneira: a 
movimentagffo do cursor segue a dire 9^0 
do prdprio mouse, que o usuario faz 
deslizar sobre a mesa. Quando o cursor 
aponta para o oomando desejado, o 
usudno aperta o botdo denonunado SE- 
LECT e o comando 6 automaticamente 
executado. Um outro botdo perimte 
controlar a veloadade e diregdo de 
SCROLL (exibi9do sucessiva de linhas) 
do arquivo mostrado na tela. 

Os comandos utihzados pelo Visi-On 
sdo o HELP (dd instrucOes sobre a ope- 
ra9ffo do sistema), CLOSE e OPEN (fe- 
cha c abrc janelas na tela onde sdo apre- 
sentados os arquivos), FRAME (estabe- 
lece o tamanho e a forma da janela de- 
sejada), OPTIONS (fomece o menu de 
op90cs de qualquer dos programas apk- 
cativos disponivcis), TRANSFER (trans- 
fere os dados para outras aplica90es), 
STOP (mterrompe a cxecu9do de um 
comando), SAVE (armazena em disco 
rigido o que estiver na tela) e FULL (faz 
com que 0 documento apontado ocupe 
todo 0 espa90 da tela). 

Esse software permite rodar simulta- 
ncamente vdrios programas aplicativos 
diferentes, todos com a possibdidade de 
interagir entrc si. Esses programas po- 
dem ser vistos na tela (diversos deles de 
uma s6 vez) atravds die janelas criadas 



pelo usudno, que pode aumentd-las, di- 
minuMas e deslocd-las para qualquer 
ponto do video. Tudo isso sem tocar 
no teclado, somente utilizando o mou- 
se. O usudno tambdm pode transfenr 
dados bvremente de uma aplica9So pa- 
ra outra e, no caso de aplica90es rclacio- 
nadas entre si, a altera 930 nos dados de 
uma provoca a altera9ao automdtica nos 
dados de todas as demais. Osresultados 
podem ser apresentados sob as formas, 
simples ou combinadas, de grdficos, ta- 
belas ou relatdno escrito. 

0 outro novo pacote apresentado pe- 
la VisiCorp na NCC ’83 foi o VisiAnswer, 
que perimte consultas a bancos de da- 
dos no IBM-PC. Aldm desse, a empresa 
mostrou a sua VisiScries, composta por 
diversos softwares para planejamento e 
controle financciro, 013980 e gerencia 
de arquivos, processamento de texto 
etc. 

A MicroPro mostrou os seus produ- 
tos CP/M para mdquinas de 64 K RAM: 
CalcStar (tipo VisiCalc), DataStar (siste- 
ma para tratamento de arquivos), Info- 
Star (gerenciador de banco de dados), 
Mail Merge (sistema de mala direta capaz 
de interligar os pacotes DataStar e 
WordStar), ReportStar (gerador de re- 
latdrios), SpellStar (glossdrio clctr&nico), 
Starlndex (permite cnar indices com 
sub-itens, tdbua de conteudo c listas de 
figuras e tabelas), SuperSort (utilitdno 
para classifica^o, combina^&o e sele9So 
de informa^es dos a^quiVQs de dados), 
WordMaster (editor de telas) e Word- 
Star (sistema de processamento de tex- 
tos). 

No estande da Microsoft, 22 pacotes 
cobnndo ideas tais como financas e ad- 
numstra9ao, interpretador BASIC, com- 
piladores BASIC, Business BASIC, Lin- 
guagem C, FORTRAN, FORTRAN- 80 , 
Pascal e Applesoft, faciiidade de SORT, 
sistema A.LD.S. (linguagem Assembly 
para o Apple II), pacote de Macro As- 
sembler e uma implementa9&o de LISP 
(para Apple, CP/M -80 e MS-DOS), 
aldm de programas educacionais e re- 




Este disco rigido para TRS-80 pode ser expandido de 12 MB ati 48 MB. 




creativos. Na parte de hardware, diver- 
sos cartOes para Apple (para rodar CP/ 
M ou expandir memdna), IBM-PC (au- 
mento de memdna e comunica9So de 
dados), al£m do famoso mouse, para o 
IBM-PC. 

A Hayden ofereceu, entre outros pro- 
dutos, uma ponte de conexdo que per- 
mite ao IBM-PC executar os programas 
do Apple. 

Ainda na drea de software, causarain 
grande interesse as diversas versOes do 
LOGO, sobretudo o Apple LOGO. Essa 
linguagem de aplica9do educational, 
de caracterfsticas eminentemente grd fl- 
eas, visa ensinar a crian9as (e mesmo a 
adultos) os fundamentos ldgicos da Ma- 
.temdtica e da Computa9So. Isso 6 feito 
pela manipulavdo de um cursor tnangu- 
lar denominado tartaruga (turtle), atra- 
vt‘s do qual pode-se cnar e combmar 
uma infinidade de formas na tela. 

CLIMA DE FESTA 

Maior feira de Informdtica do mun- 
cjo, a NCC ’83 recebcu milhares de visi- 
tantes norte-amcricanos e cstrangciros, 
sobretudo japoncses e de outros paiscs 
da Asia, europeus (franceses, italianos, 
ingleses e escandinavos), aldm dos a*rca 
de 80 brasileiros, integrantes da comiti- 
va da Abicomp. 

Mais de 700 empresas expuseram 
seus produtos e serv^os, em feroz com- 
peti9&o de tccnologia e marketing, apre- 
sentando as mais recentes mova^es que 
os seus laboratdrios conseguiram produ- 
zir. Quern ganliou com isso foram os 
visitantes que, ai^m de bons produtos e 
do atendimento por demonstradores al- 
tamente capacitados (a Apple, por 
exemplo, para demonstrar a sua versSo 
do LOGO, contratou uma professora do 
Massachussets Institute of Technology 
- MIT, Umversidade que desenvolveu 
essa linguagem), viveram tambdm um 
clima de festa, onde nHo faltaram shows 
com artistas famosos, catdlogos e folhe- 
tos de impecdvel quahdade, distnbufdos 
aos milhares, e at 6 expositores com flor 
na lapela. ■ 
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Na niaioria dos micros pessoais, o 
usuArio tern que convivcr com uma 
$£rie de limitaybcs dc capacidade de 
membria, pcrifbricos etc. No APLY 
300 isso n4o acontece. 

Para comeyar, o A PI Y 300 i o uni- 
co micro pessoal brasilciro de sua 
ciasse que jA incorpora interface se- 
rial RS-232C. Isso significa que ele 
pode operar com virtualmcnte todas 
as impressoras disponiveis no merca- 
do, atfm de comunicar-se corn outros 
computadores. F maito breve voc£ 
poderA utili/.ar tambdm dims unida- 
des dc disquctc c gcrador programA- 
vel dc atd oito cores. 

Seu processador 7.-80A 6 um dos 
mais rapidos cm uso no Brasil, com 
ciclo de clock de 3,25 MHz. Com a 
ampla membria RAM de 32 ou 48 
Kbytes, voce nao precisa espremer 
suas aplicaybes, nem faz.erginAstiea 
na programayAo. 

M as nao c sb isso que o APLY 300 
se distingue dos demais sistemas. No 
video, por cxcmplo, al£m de funcio- 
nar com qualqucr TV preto e bran- 
co ou colorida, ele dispbe ainda de 
um collector de SVC (Sinai de Video 
Composto) para TVs com adaptayAo 
deentrada diretade video, o que per 
mite maior nitidez de imagem. 



APPLY300: 

omais 
profissional 
dos micros 

pessoais. 



CARACTERfSTICAS 

tEcnicas 

• Microprocessador Z80-A 

• Finguagem Basic 

• 8 Kbytes dc ROM 

• 32 ou 48 Kbytes dc RAM 

• 69 teclas tipo membrana 
flexivel, com 160 funyOes 

• Joystick, Imprcssora (RS 
232-C) 

• Video: Aparelhos dc TV B e 
P ou Colorida • 

• GravayAo em fita cassctc 
comum 

• Feedback auditive no tcclado 

• Bip programavel e com 
membria 

• Tela para texto com 24 por 
32 earacteres alfanumbricos 

• lela para grAfico com 44 por 
64 pontos graficos 

• Teclas especiais: RUBOUT, 
EDIT, GRAPHICS, 
FUNCTION, etc. 

apucacOes 

• Programas educacionais 

• Jogos animados 
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E para sua maior qualidadc, a fon 
tc dc alimcntayAo, localizada no pro 
prio corpo do aparelho, 6 capaz de 
fornecer trds tensbes (selecionAveis 
por chave), que poderAo ser utiliza- 
das para dispositivos externos ao 
computador. 

Essas sAo apenas algumas das ca- 
racteristieas dcste poderoso sistema. 
Vcnha vfi-lo pessoalmentc, voce vai fi- 
car impressionado com o desempe- 
nho do APLY 30f\ o mais profissio- 
nal dos micros pesados. 
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MICROCOMPUTADORES 

Centro de Desenvolvimento de Sistemas 
EI6tricos Ind. Com. Ltda. 

Estrada do CalcAo, 1 1 - sala 202 - 
llha do Governador - Rio de Janeiro - R.I 
CEP 21931 - Tel.: 396-4264 



• Jogos inteligentes 

• Estatistica 

• Cdlculos matemAticOs 

• Finanyas 

• CAIcuIos Estruturais 

• Controle de estoque 

• Controle de conta bancAria 

• Oryamento domestico 

• GrAficos 

• ProgramayAo Assembler 

• E muitas outras aplicayoes 



Para que futuro voce esta 
educando seu Who? 





Os dois usam computador. 



^ f MM ssim como toda educacdo 

MMj ernarta dr alqunta imagem do 

MM futuro, U kh educacdo emana 
M/^M alguma imagem do fuluro." 

M ■ (Alvin T ofller) 

O CP 200 da Proldgica d simples de opemr. 
cusla menos do gue urn tv a cores e faz 
imporlanles trabalhos de inleresse de loda a 
familia. Com ele voce e seus filftos aprendem a 
linguagem "Basic" e ficam aptos a programar 
qualquer tipo de computador, participando e 
criando o momento atual gue id e chamado de 
"a era da informdtica" . 

Basla ligar o CP 2(X) a urn televisor e a urn 
gravador para voce ter urn computador 
completo em sua casa. 

A ssim como o extrato de tomate. o 
liquidificador, o durex. o automdvel. a maquina 
de escrever e a calculadora. o CP 200 vai 
simplificar sua vida. 



E vai dar mais tempo para voce e sua familia 
criarem urn futuro melhor. 



Veja o que voce faz com o CP 200: 

• A prendizado em linguagem Basic 

• Divertidos jogos e passatempos eletrdnicos 

• Orcamento aomCstico 

• C ontrole de conta banedria 

• Aulas de matematica e fisica 

• Graficos e calculos cientificos 

SOLICITE DEMONSTRACAO NOS 
PRINCIPAIS MAGAZINES. 



PROLOGICA 

microcomputadores 



Av. Eng" Luiz Carlos Berrini. I 168 - SP 



At Maraio • 22 I 485 1 AM Manaus - 2 "1 4- 1 04 5 BA Salvador - 247-8951 - 235-4 184 CE Fortaleza - 226-0871 231-1 295 - 226-4922 - DF - Brasilia - 226-1 523 ■ 271-2128 - 
2 2 '5-4 534 - 226-4327 • 242-6344 ES Viltfrla 229-1387 222 581 I GO Gaidnia 224-7098 - 225-8598 - 224-4657 - MA ■ Sdn l.ui'i 222-6696 MT C ulaba 321-2307 -MS - 
CUimpo Grande 383-1277 - D ourados 421-1052 - MG Bela Horizonte - 201 7555 226-6336 225 3305 - 222-3196 - 227-0881 - Botim 531-3806 -GW F aMclano 841 1400 |ur> de 
Fora 212 9075 - Uberldndia • 235-1099 - 235-6)600 - Vi(05d - 891-2445 PA BWi>m - 228-001 I PB loflfl Passao - 221-8232 221-6743 ■ PR - Curitllfa - 224-5616 - 243-1731 
224 3422 223 2323 ■ 232 2793 Paula Grassa - 24-0057 PE Keci/e - 221-0142 - 221-5774 PI - Tarasina - 22243186 R| Campus 22 3714 Rio de lanelro - 264-5797 - 221-5141 - 
240-1099 -266-4499 - 253-3395 252 2050 RN Natal 222-3212 • RS - Caxias do Sul - 221-3516 - Gravalat - 88-1023 • Now Hamburao - 93-1922 Porto Mem 26 8246 
42-0908 - 27-2255 - 21-4189 - Ma Maria - 22 1-7 1 20 RO • Porto Velho - 22 1-2656 - SP Ma<atuha - 23-802 1 ■ Assis - 22-1797 - 22-2200 - Bawlos - 22-641 1 • Campinas - 2-4483 
32 4 145 lundiat - 434-0222 - Manila - 33-5099 - Mooi das Cruzes - 469-6>6>40 - 468-3779 - M of I Gua(u - 61-0256 - Plrathaba 33 1 470 - President Prudenle - 22-3165 Kitwdo Prato - 
625-5924 -625-5926 - 635-1 195 Sao loaquim da Barra - 728-2472 S do lost dos Campos 23-3752 22-731 1 - Sda |os4 do Rio Praia - 32 2842 Santas 33-2230 - Sorocaba 33-7794 - 
SC - Blumenau - 22-6277 - Campos Navas 44-0196 C rlciuma 33 1436 - Flortandpolis • 22 9622 • 22-6757 - Ita/ai - 44-1 524 - lainvilv - 33-7520 - Ria do Sul 22-0557 • SE Aracajd - 224-1310 





Caracteristicas Tecnlcas 

• Llnguagem BASIC 

• 10 Kbytes de ROM 

• 16 ou 48 Kbytes de membrla 
RAM. 

• 40 teclas e 160 fungbes. 

• Gravagio de programas am 
flta cassete comum. 

• Input e Output de dados. 

• Video: aparelhos de TV B&P 
ou colorido. 

• Fungbes especlals 
HIGHSPEED. 

• Som Opclonal. 

• Joystick, impressora. 

Prego de langamento: 

Cr$ 179.850,00 (16K) 

CrS 249.850,00 (48K) 

(Prego sujeito a alteragflo) 
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